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INTELLEC SERIES II BOOT/MOHI TOR 
VERSION 12 

COPYRIGHT <C> 1978 INTEL CORPORATION. ALL RIGHTS 
RESERVED. HO PART OF THIS PROGRAM OR PUBLICATION 
HAY BE REPRODUCED. TRANSMITTED. TRANSCRIBED, 
STORED IN A RETRIEVAL SYSTEM, OR TRANSLATED INTO 
ANY LANGUAGE DR COMPUTER LAHCUAGE, IN ANY FORM 
OR BY ANY HEAHS, ELECTRONIC, MECHANICAL, MAGNETIC, 
OPTICAL, CHEMICAL, MANUAL OR OTHERWISE, HITHOUT 
THE PRIOR WRITTEN PERMISSION OF INTEL CORPORATION, 
3065 BONERS AVENUE, SANTA CLARA, CALIFORNIA 95051. 



9800B06A 



<LEGAL C 



QHHAHD) 



'.ASSIGN 
<DISPLAY 
(ENDFILE 
i (FILL HE 
i (PROGRAM 
: (HEXADEC 
: (MOVE ME 
: (LEADER 
! (8UERY S 
! (READ HE 
i (SUBSTIT 
l (WRITE H 
i (REGISTE 
! (TRAHSFE 
! (LOGICAL 
: (PHYSICA 
I (REGISTE 
! (HUHBER> 

: (HEX DIG 



I/O CON 

MEMORY 

COMHAN 

HORY CO 

EXECUT 

IHAL AR 

HORY CD 

COHHAHD 

TATUS C 

XADEC1H 

UTE MEH 

EXADECI 

R HOD IF 

R COHTR 

DEVICE 

L DEVIC 

R IDEHT 

: : » ( 

< 

IT> : :>= 

■*«•«*« 



HAND 
COH 
t>> : 
HHAH 
E CO 
ITHH 
HHAH 

> : : 
OHHA 
AL F 
ORY 
HAL 

Y CO 
OL T 

> : ! 
E> i 
IFIE 
HEX 
HUHB 

0! 1 



ASSIGN I/O COHHAND> 

DISPLAY MEMORY COHHAHD> 

ENDFILE COHKSiND) 

FILL MEMORY COMMAND) 

PROGRAM EXECUTE COWKAMD) 

HEXADECIMAL ARITHMETIC COHHAHD> 

MOVE MEMORY CDMHAKO) 

LEADER COMMAND) 

BUERY STATUS COHHAN&) 

READ HEXADECIMAL FILE COMMAND) 

SUBSTITUTE MEMORY COMMAND) 

HRITE HEXADECIMAL RECORD COMMAND) 

REGISTER MODIFY COMMAND) 

TRAHSFER CONTROL TO DIAGNOSTIC PROGRAM COHHAHD) 

= A(LOGICAL DEVICE)«(PHYSICAL DEVICE) 

) : ••' D(HUHBER), (NUMBER) 

(NUMBER) 

:> F(HUHBIR),(HUH8£R>, (NUMBER) 

D) ::■= G(NUHBER), (NUMBER), (HUHBER) 

COHHAHD) :i« H( NUMBER ),( NUMBER) 
:> K(HUNBER), (HUHBER), (HUHBER) 

: : = 

COHHAHD) : !» R(HUHBER) 

AHD) : : « S( NUMBER > (C OHHA ) . . . 

RD COHHAHD) !!• V ( HUHBER) ,( HUHBER > 

D> ::> X(REGISTER IDENTIFIER >( HUHBER) .. . 

AGHOSTIC PROGRAM COHHAHD) i:« Z* 

CAL CONSOLE! READER !LIST!PUHCH 

RT!TTY!PTR!PTP!LPT!BATCH!1!2 

:• A>B!C!D!EIF!H! I !L!H!P! S 

T) 

HEX DIGIT) 

!4!3!6!7!8!»l A! B!C!0!E!F 

»«*u«a»»*«tm»a»ll»««»« = « = ««lli*i-. •lllKIDIMtHII 



tSIS-11 8080/8085 MACRO ASSEMBLER. V2.0 



MODULE PACE 



IOC OBJ 



SEQ 



SOURCE STATEMENT 



OOOC 

0012 
0401 



30C0 
COCO 
00C1 
0OC1 



aooc 

0005 
30 00 

0008 
0001 
0009 
0004 

aooc 

0002 



OOFE 
OOFF 



3012 
00 00 
0008 
0020 



0001 



53 
54 
55 
56 
5? 
58 
59 
80 
£1 
82 
83 
84 
65 
66 
67 
68 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
80 
81 
82 
83 
84 
65 
86 
87 
88 
89 
90 
91 
92 
93 
94 
95 
96 
97 
98 
99 

too 

101 
102 
103 
104 
105 
106 
107 



* 

VER 

VERH 

DATE 

; MOT 

J THE 

J PRO 

THE 

AND 

THE 

IIHE 

THE 

* 
* 



TITLE (' IHTELLEC SERIES II HOMITOR. VERSION 1.2. 4 JANUARY 1978 ') 
Edit 12 i VERSION I .2 

ERU 12N i STORAGE REPRESENTATION OF VERSION 
E8U 0401H S CREATION DATE. 04 JANUARY 1978 
E: 

PATE SHORN ABOVE IS ENCODED IN A T II BYTE FIELD IN BOTH THE BOOTSTRAP 
H AND THE MONITOR PROM IN ORDER TO CONTROL NEM RELEASES OF THIS PROGRAM. 
DATE CODE IS LOCATED AT ADDRESSES 0E804H AND 0E80SH IN THE BOOTSTRAP 
AT ADDRESSES DF824H AND 0F825H IN THE MONITOR. 

VERSION CODE IS LOCATED IN THE MONITOR ROM AT ADDRESS 0F82FH. 
N A HER RELEASE IS ISSUED. PLEASE CHANGE THE DATE AND VERSION CODES 

COPYRIGHT NOTICE IS LOCATED IN THE MONITOR ROM BEGINNING AT DF830H. 
•I***************'*********************************************************** 

SYMBOL DEFINITIONS « 

* 



IHTELLEC SERIES I! SYSTEM CONSTANTS 



INTEGRATED CONSOLE I/O PORTS 



CONI 
CONO 
CONS 

CONC 



ERU 
EBU 

ERU 
EQU 



OCOH 

OCDH 
0C1H 
0C1H 



CONSOLE IHPUT DATA PORT 

COHSOLE OUTPUT DATA PORT 

CONSOLE STATUS PORT 

COHSOLE CONTROL PORT 



SYSTEM BOOTSTRAP CONSTANTS (ISSUED TO PORT CPUO 



DISABL ERU OOH 
EHA8L ERU 05H 
DISAXP EQU OOH 



EHAXP 

BOVROF 

BOVRON 

BTDGOF 

BTDGON 

HOVBOT 



ERU 
E8U 
E0U 
ERU 
ERU 
ERU 



08H 
01H 
09H 
04H 
OCH 
02H 



i DISABLE INTERRUPTS 

; EHABLE INTERRUPTS 

; DISABLE AUXILIARY PRON 

EHABLE AUXILIARY PROM 
TURN OFF 80S OVERRIDE 
TURK OH BUS OVERRIDE 
TURN OFF BOOT/DIAGNOSTIC 
TURK OH BOOT/DIAGNOSTIC 
HOVE BOOT TO 0E8O0H 



SYSTEM I/O PORTS 



CPUS 
CPUC 



EOU 
ERU 



DFEH 
OFFH 



CPU 
CPU 



STATUS PORT 
COHTROL PORT 



(CONTROLS BOOT I AUX.PROH) 



SYSTEM INTERRUPT CONSTANTS 



ICU1 
ICH2 
0CU3 
EOI 

J 



EBU 
ERU 
EOU 
EBU 



00010010B 
D00000008 
000010118 
001000008 



INITIALIZATION COMMAND WORD 1 

INITIALIZATION COMMAND WORD 2 

OPERATION COMMAND UORD 3 
EHD OF INTERRUPT 



SYSTEM INTERRUPT MASKS AMD VALUES 



INTO 



EBU 



0OOOO0O1B 



MASK FOR INTERRUPT LEVEL 



r 3 I S -I I 8080/6085 MACRO ASSEMBLER. V2.0 
INTELLEC SERIES II MONITOR, VERSION 1.2. 4 



MODULE PACE 
JANUARY 1978 



.00 OBJ 



SEQ 



SOURCE STATEMENT 



0002 
0004 
0006 
0010 
9020 
9040 
00 80 
0000 



■OOrt) 
00 FC 

30FC 



0002 
0001 
0020 
00 10 



0003 
3002 
30 0! 
0000 
303C 

aooe 

3004 
■3 00 
30 10 
0020 
30C0 
^030 
30 4 



3001 
0002 
30 04 
30 0? 
30 10 
3020 
■3 'HO 
3030 



106 
109 
110 

11 1 

112 
113 
114 
115 
116 
11? 
118 
119 
120 
121 
122 
123 
124 
125 
126 
127 
128 
129 
130 
131 
132 
133 
1 34 
135 
136 
137 
138 
139 
140 
141 
142 
143 
144 
145 
146 
147 
148 
149 
150 
151 
152 
153 
154 
155 
156 
157 
158 
159 
160 
161 
162 



1NT1 
INT2 
IHT3 
INT4 
INT5 
INT6 
INT7 
IHTA 



E9U 
EQU 
ERU 
ESU 
EQU 
EQU 
EQU 
EQU 



000000108 
000001 DOB 
000010008 
00010000B 
001000008 
010D0000B 
100D0000B 
OOOOOOOOB 



; NO INTERRUPTS ALLOWED AT ALL 



SYSTEM INTERRUPT I/O PORTS 



SICPO ERU 

SICP1 EQU 

SDCPO EQU 

SDCP1 EQU 



OFDH 
OFCH 
OFDH 
OFCH 



INITIALIZATION COMMAND PORT 

INITIALIZATION COMMAND PORT 

OPERATION COMMAND PORT 

OPERATION COMMAND PORT 1 



DEDICATED PROM PROGRAMMER CONSTANTS (USED IN C,P,T COMMANDS) 



PCOHP ERU 

PGRDY EQU 

PSOCK EQU 

PNIB EQU 



; *- 



0000001 OB 
00000001B 
00100000B 
D0010D00B 



PROGRAMMING COMPLETE 
PROM READY 

16 PIN SOCKET SELECTED 
SELECT UPPER NIBBLE 



-•-*-»-*-•- 



■*-«-*-•- 



INTELLEC SERIES II 1/0 SUBSYSTEM CONSTANTS 

TTY AND CRT NODE INSTRUCTION DEFINITIONS, I.E. 
UORD (FIRST CONTROL BYTE AFTER RESET) 



USART MODE CONTROL 



R64X 

R16X 

R1X 

SYNC 

CL8 

CL7 

CL6 

CL5 

PEHB 

PEVEN 

ST2 

ST15 

ST1 



ERU 
ERU 
ERU 
EQU 
EQU 
EQU 
ERU 
EQU 
ERU 
ERU 
ERU 
EQU 
ECU 



0000001 IB 
00000010B 
00000001B 
OOOOOOOOB 
00O0110OB 
00001000B 
000001008 
OOOOOOOOB 

oooiooooe 

00100000B 
1 1000000B 
10000000B 
010000008 



64 X BAUD RATE 
16 X BAUD RATE 
1 X BAUD RATE 
SYNC MODE 
CHARACTER LENGTH 
CHARACTER LENGTH 
CHARACTER LENGTH 
CHARACTER LENGTH 
PARITY EHABLE 
EVEN PARITY 
2 STOP BITS 
1 5 STOP BITS 
1 STOP BIT 



; TTY AND CRT COMMAND INSTRUCTION DEFINITIONS (USART COMMAND CONTROL WORD) 



TXEH 

DTR 

RXEN 

SBCH 

CLERR 

RTS 

USRST 

ENHM 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 



000000016 
OOOD0010B 
000001006 
0OOD10ODB 
00010000B 
ODIOOOOOB 
01000000B 
100000008 



TRANSMITTER EHABLE 

DATA TERMINAL READY 

EHABLE RECEIVER 

SEND BREAK CHARACTER 

CLEAR ERROR 

SET REQUEST TO SEND OUTPUT 

USART RESET - RETURH TO NODE CONTROL CYCLE 

ENA8LE HUNT MODE 



i TTY/CRT STATUS MORD BIT DEFINITIONS 



tSiS-II 8090/8085 MACRO ASSEMBLER, V2.0 
IKTELLEC SERIES II MONITOR, VERSION 1.2, 



MODULE PAGE 
4 JANUARY t»7B 



IOC 08J 



SEfi 



SOURCE STATEMENT 



aom 

0002 
0004 
0008 
0010 
0020 
0040 
0090 



0028 
aOFft 
302? 
3025 



00F4 
O0F4 
O0F5 
30F5 



30F6 

aoF? 

30F6 

■oof? 



0000 
0040 
30S0 
3000 
3020 
0010 
30 30 
3000 
3002 
3304 
0006 
3008 
300ft 
3001 
300? 
0020 
32 BA 



OOFO 
■40F1 



143 
164 
165 
166 
167 
168 
169 
170 
171 
172 
173 
174 
175 
176 
177 
1 78 
179 
180 
181 
182 
183 
184 
185 
186 
187 
188 
139 
190 
191 
192 
193 
194 
195 
196 
197 
198 
199 
200 
201 
202 
203 
204 
205 
206 
207 
208 
209 
210 
211 
212 
213 
214 
215 
216 
217 



TROY 

RRPY 

TKBE 

RPAR 

ROV 

RFR 

SYND 

DSR 



EBU 
EBU 
EBU 
EQU 
EBU 
EBU 
EBU 
EBU 



00000001B 
000000108 
000001008 
00001000B 
000100008 
00100000B 
OtOOOOOOB 
100000008 



TTY TAPE REAPER CONSTANTS 



RADCT 
RTOCT 
TBDV 
COND 



EBU 
EBU 
EBU 
EQU 



40 

250 

TXEN OR RKEN 

TXEN OR RXEN 



TTY I/O PORTS 



J 

TTYI 

TTYO 

TTYS 

TTYC 



EBU 
EBU 
EBU 
EBU 



BF4H 
0F4H 
OFSH 
0F5H 



TRANSMIT READY 
RECEIVE BUFFER READY 
TRANSMIT BUFFER EMPTY 
RECEIVE PARITY ERROR 
RECEIVE OVERRUN ERROR 
RECEIVE FRAMING ERROR 
SYNC DETECTED 
; DATA SET READY INPUT 



; TTY TAPE READER ADVANCE TIMER COUNT 
t TTY TAPE READER TIMEOUT COUNT 

OR RTS OR DTR 

OR RTS 



TTY INPUT DATA PORT 

TTY OUTPUT DATA PORT 

TTY INPUT STATUS PORT 

TTY OUTPUT CONTROL PORT 



USER I/O PORTS 



USCI 

uses 

USCO 
USCC 



EQU 
EBU 
EQU 
EQU 



0F6H 
0F7H 
0F6H 
0F7H 



INTERVAL TIMER CONSTANTS 



CTROS 

CTR1S 

CTR2S 

LCTR 

RLMB 

RLLB 

RLLH 

MODEO 

H0DE1 

M0DE2 

N0DE3 

H0DE4 

H0DE5 

8CDC 

89600 

B2400 

B0110 



EBU 
EQU 
EBU 
EBU 
EBU 
EBU 
EBU 
EBU 
EBU 
EQU 
EBU 
EQU 
EQU 
EQU 
EQU 
EBU 
EBU 



0O000O0O8 

010000008 

100000008 

000000008 

001QOOOOB 

00010000B 

OOtlODOOB 

OOOOOOOOB 

000000108 

000001008 

OOOOOUOB 

000010008 

0OO0IO1OB 

000000018 

7 

32 

698 



USER INPUT DATA PORT 

USER INPUT STATUS PORT 

USER OUTPUT DATA PORT 

USER OUTPUT CONTROL PORT 



COUNTER SELECT 
COUNTER 1 SELECT 
COUNTER 2 SELECT 
LATCHING COUNTER 
READ/LOAD MSB ONLY 
READ/LOAD LSB ONLY 
READ/LOAD LSB, MSB 
NODE 
MODE 1 
MODE 2 
MODE 3 
MODE 4 
NODE 5 
8CD COUNTER 
9600 BAUD RATE FACTOR 
2400 BAUD RATE FACTOR 
110 BAUD RATE FACTOR 



; INTERVAL TIMER (8253) I/O PORTS 



CTROP 

CTR1P 



EQU 

EQU 



DFOH 
OFIH 



; LOAD COUNTER OUTPUT COMMAND PORT 
i LOAD COUNTER 1 OUTPUT COMMAND PORT 



ms-ll 8080/8085 MACRO ASSEMBLER. V2.0 
IKTELLEC SERIES II MONITOR. VERSION 1.2. 



MODULE PACE 
4 JANUARY 1978 



IOC OBJ 



SER 



SOURCE STATENEHT 



O0F2 
D0F3 



OOCO 
OOCO 
00C1 
00C1 



0010 
0011 
0012 
0013 
0014 
3015 
OOU 
001? 
0018 
0019 
001A 
3018 
OOU 



0001 
0001 



00F8 
00F8 
OOF? 
00F9 



0010 
0060 
0040 
0011 
0012 
0013 
0014 
0013 
0016 



21B 
219 
220 
221 
222 
223 
224 
225 
226 
227 
228 
229 
230 
231 
232 
233 
234 
235 
236 
237 
238 
239 
240 
241 
242 
243 
244 
245 
246 
247 
248 
249 
250 
251 
252 
253 
254 
255 
256 
257 
258 
25? 
260 
261 
262 
263 
264 
265 
266 
267 
268 
269 
270 
271 
272 



CTR2P EOU 0F2H 
ITCP EOU 0F3H 

)♦-«-*-♦-»-*-*-«-»-♦-♦-»- 
J 



; LOAD COUNTER 2 OUTPUT COMMAND PORT 
; INTERVAL TIMER OUTPUT COMMAND PORT 
■*-•-»-«-*-•-♦-»-»-«-*-«-»-♦-»-*-*-*-•-«-»- 



I/O CONTROLLER SYSTEM CONSTANTS 



I/O CONTROLLER PORTS 



IOCI 

IOCO 

IOCS 

IOCC 

J 

; CRT, 

t 

CRTC 

CRTS 

KEYC 

KSTS 

KIHT 

HP6C 

UPICC 

VDBC 

MDBCC 

RDBC 

RDBCC 

RRSTS 

RDSTS 



EOU 
EOU 
EQU 
EOU 



OCOH 
OCOH 
0C1H 
DC1H 



I/O CONTROLLER INPUT DATA (FROM D B B ) PORT 

I/O CONTROLLER OUTPUT DATA (TO DBB> PORT 

I/O CONTROLLER INPUT DBB STATUS PORT 

I/O CONTROLLER OUTPUT CONTROL COMMAND PORT 



KEYBOARD, AND FLOPPY DISK COMMANDS 



EBU 
EOU 
EOU 
EOU 
EOU 
EOU 
EOU 
EQU 
EQU 
EQU 
EQU 
EOU 
EOU 



ION 
1 1 H 

12H 
13H 
14H 
15H 
16H 
17H 
18N 
19H 
IAN 
1BH 
1CH 



CRT OUTPUT DATA COMMAND 

CRT DEVICE STATUS COMMAND 

KEYBOARD INPUT DATA COMMAND 

KEYBOARD DEVICE STATUS COHHAHD 

RESERVED 

FLOPPY PARAMETER BLOCK TRANSFER COMMAND 

FLOPPY PARAMETER BLOCK(CONT) TRANSFER COMMAND 

FLOPPY DATA BLOCK OUTPUT COMMAND 

RESERVED 

FLOPPY INPUT DATA BLOCK COMMAND 

RESERVED 

FLOPPY RESULT STATUS COMMAND 

FLOPPY DEVICE STATUS COMMAND 



CRT, KEYBOARD. AND FLOPPY STATUS BITS 



KRDY EOU 
FRDY EQU 



00000D01B 
00000001B 



; KEYBOARD READY BITH DATA 
; FLOPPY READY FOR DATA 



PARALLEL I/O SYSTEM CONSTANTS 



; PARALLEL I/O PORTS 

) 

PI01 ESU DF8H 

PIOO EQU 0F8H 

PIOS EQU 0F9H 

PIOC EQU DF9H 

J 

I PTR. PTP, LPT AND UPP COMMANDS 



; PARALLEL I/O INPUT DATA (FROM DBB) PORT 

; PARALLEL I/O OUTPUT DATA (TO DBB) PORT 

i PARALLEL I/O INPUT DBB STATUS PORT 

i PARALLEL I/O OUTPUT CONTROL COHHAHD PORT 



RDRC 

PTRREV 

PTRADV 

RSTC 

PUNC 

PSTC 

LPTC 

LSTC 

HPPC 



EBU 
EBU 
EOU 
EOU 
EOU 
EQU 
EOU 
EBU 
EOU 



OIOH 

01100000B 

D1000000B 

OUH 

012H 

013H 

014H 

015H 

OUH 



; REAPER DATA TRANSFER COMMAND 

; READER REVERSE DIRECTION 1 FRAME OPTION 

; READER ADVANCE DIRECTION 1 FRAHE OPTION 

i READER DEVICE STATUS COMMAND 

) PUNCH DATA TRANSFER COMMAND 

; PUNCH DEVICE STATUS COHHAHD 

; LINE PRINTER DATA TRANSFER COHHAHD 

; LINE PRINTER STATUS COHHAHD 

; HRITE TO UPP COHHAHD 



IS1S-II 808076085 MACRO ASSEMBLER. V2.0 
IKTELLEC SERIES II MONITOR, VERSION 1.2. 



MODULE PAGE 
JANUARY 1978 



IOC OBJ 



SEO 



SOURCE STATEMENT 



3017 
0018 



0001 
0001 
0001 



0090 
0001 
0002 
0003 
0004 
3005 
3006 



0007 
0008 
0009 
'30 0ft 



0001 
00 02 
0004 
0008 



0004 
0079 
007A 
007B 
0078 
3000 



0000 
FFFF 
DOFF 



0070 
SOFA 



273 
274 
273 
276 
277 
278 
279 
280 
281 
282 
2 83 
284 
2BS 
286 
287 
288 
289 
290 
291 
292 
293 
294 
2 95 
296 
297 
298 
299 
300 
301 
302 
303 
304 
30S 
306 
307 
308 
309 
310 
311 
312 
313 
314 
31S 
316 
317 
318 
319 
320 
321 
322 
323 
324 
329 
326 
327 



RPPC ECU 017N 

RPSTC EQU 01SH 

J 

> LPT, PTR AND PIP STATUS BITS 



LPTRY EQU 
PTRDY EBU 
PTPRY EOU 



0OODO0O1B 
000000018 
000000018 



READ FROM UPP COMHAHD 
READ UPP STATUS COMMAND 



LPT READY 

PTR READY BUM DATA 

FTP READY FOR DATA 



;»-*-*-*-*-*-*-*-*-*-*-*- 



■*-*-*-*-< 



!-*-*-*-*-*-*-*- 



-*-*-*-* 



PARALLEL I/O AND I/O CONTROLLER SYSTEM COMMANDS 



PACIFY 

ERESET 

8YSTAT 

DSTAT 

SRBDAK 

SROACK 

SR8 



EBU 
EBU 
EBU 
EBU 
EQU 
EBU 
EOU 



ODH 
01H 
02H 
03H 
04H 
OSH 
D6H 



REINITIALIZE SYSTEM 

ERROR RESET 

SYSTEM STATUS 

DEVICE STATUS 

DEVICE SERVICE REBUEST 

SYSTEM SERVICE REBUEST ACK 

SERVICE REBUEST 



ACK 



i PARALLEL I/O AND I/O CONTROLLER DIAGNOSTIC COMMANDS 



DECHO EBU 

CSKEH EBU 

TRAM EBU 

SINT EBU 



07H 
D8H 
09M 
OAH 



DATA ECHO TEST 

CHECKSUM MEMORY 

TEST RAH 

SYSTEM INTERRUPT CONTROL 



t PARALLEL I/O AND I/D CONTROLLER STATUS CONSTANTS 

i 

OIF EBU 0000000 IB 

IBF EBU 0000001 OB 

FO EBU 00000100B 

CHOTD EBU 00001000B 



■*-«-*-•-«-»-*-*-*-»-*-»-*• 



SLAVE OUTPUT BUFFER IS FULL 

SLAVE INPUT BUFFER IS FULL 

FLAG D - SLAVE IS BUSY, MASTER IS LOCKED OUT 

DB6 CONTAINS CONTROL INFO NOT DATA 



I FDCC (FLOPPY DISKETTE CHANNEL COMMAND) CONSTANTS 



OPCPL 

LOWN 

HI 

RSTS 

DSTS 

TRKO 



EBU 
EBU 
EOU 
EOU 
EBU 
EBU 



4 

79H 

7AH 

7BH 

78H 

3000H 



DISK COMPLETION STATUS 

LOV( IOPB) 

HICH(IOPS) 

DISK RESULT STATUS INPUT PORT 

DISK STATUS INPUT PORT 

FIRST ADDRESS OF DISK BOOTSTRAP 



CONDITIONAL ASSEMBLY SWITCHES 



FALSE EBU 
TRUE EBU 
HMSK EBU 



NOT FALSE 
OFFH 



GLOBAL CONSTANTS 



OHEHS 
TOUT 



EBU 
EQU 



112 

230 



J SAFE MOVE OF 16 BITS INTO 6 BIT REGISTER 



t MILLISECOND TINE CONSTANT 

230 MS. COUNTER FOR READER TIMEOUT 



rSIS-II 8080/B085 MACRO ASSEMBLER, V2.0 
IKTELLEC SERIES II HOHITOR, VERSION 1.2, 



HOODIE PAGE 
4 JANUARY 197B 



.DC OBJ 



SEQ 



SOURCE STATEMENT 



OOQD 

OOOft 
0003 



OOFC 
00F3 
OOCF 
003F 

0000 
0001 
0002 

0003 

3000 
0004 
0008 

oooc 

0000 
9010 
0020 
0030 

0000 
0040 
0080 

aoco 



O0FB 
OOFA 
O0FB 
OOFA 



0001 
0002 
0004 
0008 
0010 
0020 
0040 
0080 



00E7 
00F7 



32B 
329 
330 
331 
332 
333 
334 
335 
336 
33? 
338 
339 
340 
341 
342 
343 
344 
345 
346 
347 
348 
349 
350 
351 
352 
353 
354 
355 
356 
357 
358 
359 
360 
361 
362 
363 
364 
365 
366 
367 
368 
369 
370 
371 
372 
373 
374 
375 
376 
377 
378 
379 
380 
381 
382 



CR 
LF 
ETX 
; 

! HOHITOR 



EBU 
EAU 
EBU 



ODH 
OAH 
03H 



ASCII VALUE OF CARRIAGE RETURN 
ASCII VALUE OF LINE FEED 
MONITOR BREAK CHARACTER (CONTROL 



C ) 



I/O STATUS BYTE MASKS AND VALUES 



CMSK 
RHSK 
PHSK 
LHSK 



EBU 
EBU 
EBU 
EOJ 



llUUOOB 
1 111001 IB 
1 10011 1 IB 
0011 11 111 



CTTY 


EOU 


OOOOOOOOB 


CCRT 


EBU 


00000001B 


BATCH 


EBU 


OOOD0010B 


CUBE 


EBU 


0000001 IB 


RTTY 


EBU 


000000008 


RPTR 


EBU 


00000100B 


RUSE1 


EBU 


00001DDOB 


RUSE2 


EBU 


000011008 


PTTY 


EBU 


OOOOOOOOB 


PPTP 


EBU 


OOOIODOOB 


PUSEI 


EBU 


0010D0D0B 


PUSE2 


EBU 


001100008 



LTTY 
LCRT 
LLPT 
LUSE 



EBU 
EBU 
EBU 
EBU 



OOOOOOOOB 
010000008 
100000DOB 
1 1000000B 



MASK FOR LOCAL CONSOLE I/O 

MASK FOR READER INPUT 

MASK FOR PUNCH OUTPUT 

MASK FOR LIST OUTPUT 

LOCAL COHSOLE = TTY 

LOCAL CONSOLE = CRT 

BATCH MODE: 

COHSOLE INPUT - READER. COHSOLE OUTPUT = LIST 

USER DEFINED LOCAL COHSOLE I/O 

READER * TTY 

READER = PTR 

USER DEFINED READER ( 1 ) 

USER DEFINED READER ( 2) 

PUNCH « TTY 

PUNCH * PTP 

USER DEFINED PUNCH < 1 ) 

USER DEFINED PUNCH (?) 

LIST = TTY 

LIST ■= CRT 

LIST * LPT 

USER DEFINED LIST 



LOCAL I/O SUBSYSTEM IHTERRUPT PORTS 



IICPO 
IICP1 
IDCPO 
I0CP1 



EBU 
EBU 
EBU 

EBU 



OFBH 
OFAH 
OFBH 
OFAH 



INITIALIZATION COMMAND PORT 
INITIALIZATIOH COMMAND PORT 
OPERATION COMMAND PORT 
OPERATIOH COMMAND PORT 1 



; LOCAL INTERRUPT STATUS AND CONTROL BITS 



ITTYO 

ITTYI 

IPTP 

IPTR 

ICRTO 

ICRT1 

UPT 

HENB 



EBU 
EBU 
EBU 
EBU 
EBU 
EBU 
EBU 
EBU 



D00000016 
000000106 
OOOOOIDDB 
00001000B 
000100006 
00100000B 
01000000B 
100000008 



;*-»-*-•-«-»-»-•-•-»-*- 



i BOOTSTRAP CONSTANTS 



•»-*-*-♦■ 



FSTOP 
FSTP 



EBU 
EBU 



0E7H 
0F7H 



TTY OUTPUT INTERRUPT 

TTY INPUT INTERRUPT 

PTP OUTPUT INTERRUPT 

PTR INPUT IHTERRUPT 

CRT OUTPUT IHTERRUPT 

CRT INPUT IHTERRUPT 

LPT OUTPUT IHTERRUPT 

ENABLE MONITOR IHTERRUPTS EXCEPT LEVEL 7 



FULL SYSTEM TOP OF MEMORY ADDRESS 
FULL SYSTEM TOP PAGE ADDRESS 



mS-Il B0B0/B0B5 MACRO ASSEMBLER. V2.0 
EKTELLEC SERIES II MONITOR. VERSION 1.2, 



MOBULE PACE 
JANUARY 1978 



LOC OBJ 

0004 
007F 
OOFF 
OOFF 
0041 
0001 
0040 
04CD 
0008 
ODOO 
0004 
F809 
F821 
F84« 



0000 
0003 
0001 
0002 
0301 



5 3 00 

5800 

5800 C306E8 

£803 00 



(804 0104 



E806 F3 
E80? 3E02 



SEO 

383 

384 
385 
386 
38? 
388 
389 
390 
391 
392 
393 
394 
395 
396 
39? 
398 
399 
400 
401 
402 
403 
404 
405 
406 
407 
408 
409 
410 
411 
412 
413 
*14 
415 
416 
*1? 
418 
419 
420 
421 
422 
423 
424 
425 
426 
«2? 
428 
429 
430 
431 
432 
433 
434 
433 
436 
437 



SOURCE STATEMENT 

FDOC ESU 004H 

ACHRN ESU 07FH 

ITIKO ESU OFFH 

LBHK ESU OFFH 

ICFG ESU 041H 

ICHP ESU 001H 

LSTE ESU 040H 

RTCC EOU 1229 

DPRNT EOU 06H 

TRKL EOU 26*128 

PARNL ESU 4 

COP ESU 0F809H 

I0CDP1 ESU 0F821H 

I0CDP2 ESU 0FS44K 



FLOPPY DISK OPERATION CONPLETE 

ASCII CHARACTER HASK 

IOC TIMEOUT CONSTANT 

LOHER SUE HASK 

CONSOLE CONFIGURATION STATUS 

INTEGRATED CONSOLE NOT PRESENT STATUS 

LIST DEVICE VALUE FOR CONSOLE 

REAL TIDE CLOCK IKS CPHSTAMT 

DISK READY H Pi S K 

TRACK LENGTH 

PARAHETER LENGTH - 1 

ENTRY POINT FOR CONSOLE OUT 

ENTRY POINT FOR IDC DRIVER 1 

ENTRY POINT FOR IBC DRjVER 2 



•*-•-*-•-♦- 



•*-*-*-*-•-■ 



1 PACE DEDICATED RAN LOCATIONS, INITIALIZED BY BOOTSTRAP PROK CODE 



RESET: 



IDBYT: 



NEHTOP: 



INITIO: 



ORG 



DS 



DS 



DS 



DS 



; BOOTSTRAP PRON CODE 



BBASE 



IHIT: 



SET 
ORG 
JNP 

08 



0E800H 

BBASE 

BSO 



DH 
FUNCTIONS! 



DATE 



TRAP TO HON1T0S RESTART 
I/O SYSTEM STATUS BYTE 
TOP OF RAN. ONLY H SAVED 
INITIAL I/O CONFIGURATION 



BRANCH AROUND DATE CODE BYTE 

INITIALLY 

CONSOLE * TTY, 

READER « TTY, 

PUNCH « TTY, 

LIST * TTY 

DATE STAHP FOR BOOTSTRAP PRON 



INITIALIZE INTERRUPT SYSTEN AND REAL TINE CLOCK 

0. INITIALIZE PORT OFFH (CPUC) 

1. PROGRAH SYSTEH INTERRUPTS (8239) 

2. HASK ALL SYSTEM INTERRUPTS BUT TRAP LOGIC 

3. PROGRAM I/O SUBSYSTEM INTERRUPTS (B2S9> 

4. MASK ALL I/O SUBSYSTEM INTERRUPTS 

5. PROGRAH REAL TIME CLOCK 



BSO: 



D! 
HVI 



A, H0V80T 



DISABLE INTERRUPT SYSTEN 

TURN OH RAN (RON HILL NOW RESPOND ONLY TO ADDRESS E800H? 



tSIS-II 8080/8085 MACRO ASSEMBLER. VZ.O NODULE PACE 

IKTELLEC SERIES II MONITOR. VERSION 1.2, 4 JANUARY 1978 



IOC 


OBJ 


E809 


D3FF 


E80B 


3E01 


E80D 


03FF 


E80F 


3E0S 


f 811 


D3FF 


£813 


3E08 


E815 


03FF 


£81? 


3E12 


£819 


D3FD 


E81B 


D3FB 


£810 


3E00 


E81F 


03FC 


£821 


D3FA 


£823 


SEFE 


£825 


D3FC 


£827 


3EFF 


E829 


D3FA 


EB2B 


3EB6 


E82D 


P3F3 


E82F 


21CD04 


£832 


7D 


E833 


03F2 


£835 


?C 


E836 


D3F2 



E838 210000 

ES3B 24 

E83C 7E 

E83P 2F 

E83E 77 

E83F BE 

£840 2F 

£341 77 

£842 CA3BE8 

£845 2B 

£846 3EE7 

£848 BC 

£849 C24EEB 

E84C 26F? 

E84E 220400 

E8S1 01CBEA 

E854 69 



SEB 

4 38 
439 

440 
441 
442 
443 
444 
445 
446 
447 
448 
449 
430 
451 
432 
453 
454 
455 
456 
457 
458 
459 
460 
461 
462 
463 
464 
465 
466 
467 
468 
469 
470 

471 ; 

472 ; 

473 ; 
474 

475 BS1 : 

476 

477 

478 

479 

4B0 

481 

482 

4B3 

4B4 

485 

4B6 

487 

488 

489 BS2 i 

490 

491 

492 



SOURCE STATEMENT 



OUT 
HVI 
OUT 
HVI 
OUT 
HVI 
OUT 
HVI 
OUT 
OUT 
HVI 
OUT 
OUT 
HVI 
OUT 
HVI 
OUT 
HVI 
OUT 
LX! 
HOV 
OUT 
HOV 
OUT 

B. 



LX I 

IHR 

HOV 

CHA 

HOV 

CUP 

CHA 

HOV 

JZ 

OCX 

HVI 

CHP 

JNZ 

HVI 

SHU 

LXI 

HOV 



CPUC 

A.BOVROF 

CPUC 

A.EHABL 

CPUC 

A.EHAXP 

CPUC 

A, ICW1 

SICPO 

IICPO 

A, ICN2 

SICP1 

IICP1 

A, MOT INTO 

S0CP1 

A, NOT IHTA 

I0CP1 



i TURN OFF BUS OVERRIDE 

; PSEUDO ENABLE OF INTERRUPTS 

; ENABLE AUXILIARY PROH 

i OUTPUT INITIALIZATION COHHAHD WORD 1 

J TO SYSTEH 8259 

: TO I/O B259 

; OUTPUT INITIALIZATION COHHAHD HORD 2 

l TO SYSTEH 8259 

i TO I/O 8259 

; INITIALIZE HASK RECISTER 

; FOR SYSTEM 8259 

; INITIALIZE MASK RECISTER 

; FOR I/O 8259 

INITIALIZE 1HS REAL T I HE CLOCK 



A.CTR2S OR H0DE3 OR RLLN 

ITCP 

H.RTCC 

(t-L 

CTR2P 

A.H 

CTR2P 



INITIALIZE RAH. 

1. CONFUTE SIZE OF RAH HEHORY. 

2. SET UP DEDICATED NEHORY LDCATIOHS 

USER I/O ENTRY POINTS (TOP OF HEHORY) 

EXIT TEMPLATE 

USER REGISTERS 

USER INTERRUPT HASK 

USER STACK 

HONITOR STACK 

RESTART ROUTINE JUHP ADDRESS 



H,0 

H 
A.H 

M, A 
II 

H, A 

BS1 

H 

A.FSTOP 

H 

BS2 

H.FSTP 

HEHTOP 
B.TOS 

L.C 



INITIAL VALUE H: =0. L :=0 

INCREMENT BY 256 BYTE PACES. I E . 1 OON, 200H. . . . , FBOOH 

FETCH CONTENTS OF HEHORY 

INVERT IT 

ATTEHPT TO WRITE IT BACK INTO HEHORY 

IS LOCATION READ/MRITE. I.E. EXISTING RAH 

IHVERT AGAIN BACK TO ORIGINAL VALUE 

WRITE ORIGINAL DATA VALUE BACK IN 

YES. CONTINUE (I.E. STILL CONTIGUOUS RAH) 

OTHERWISE, IT'S LAST ADDRESS IN RAH 

LOAD FULL SYSTEH PAGE ADDRESS 

TEST FOR FULL SYSTEH 

JUHP IF NOT FULL SYSTEH 

LOAD H MITH TOP PAGE ADDRESS 

STORE TOP OF HEHORY 

HOVE EXIT TEMPLATE TO RAH 



IS1S-II 8Q8B/8085 MACRO AS8EHBIER, V2.B NODULE PAGE 10 
INTELLEC SERIES II HONITOR, VERSION 1.2. 4 JANUARY 1978 

tOC OBJ SEB SOURCE STATEHEHT 

£855 F9 493 SPHL J SET MONITOR'S STACK POINTER 

494 B&3> 

E936 OA 495 LDAX B 

£897 7? 496 NOV H,A 

£858 OC 497 INR C j HOVE BOTH POINTERS 

E859 2C 498 IHR t 

E85A C256E8 499 JNZ BS3 ; EHB OH PAGE BOUNDARY 

E85D 2ED1 500 HVI L,SLQC AND HRSK ) SET UP INITIAL VALUE FOR USER STACK 

E85F 74 501 NOV H,H ; LOVER HALF OF STACK POINTER IS KNOHN 

ES60 35 502 OCR H i HERELY SET UPPER HALF 

503 I TRAP TO NONITOR (AT LOCATIONS 0,1,2) 

E861 3ECJ 504 HV I ft-UHP RESTART) 

E863 320000 505 STA RESET 

E866 21D4FE 506 LXI H. RESTART ,' SET UP RESTART FOR BREAKPOINT 

E869 220100 507 SHLO RESET+1 ; LOGIC 

508 I 

509 i C. PROGRAM ttt DEVICES. 

510 i I. BAUD RATE GENERATOR FOR CRT 

511 ) 2. USART FOR CRT 

512 ; 3. BAUD RATE GENERATOR FOR TTY 

513 ,' 4. USART FOR TTY 

514 ; 

E86C 3E76 515 HVI A,CTR1S OR HO0E3 OR RLLH 

E86E D3F3 516 OUT I TCP 

£370 212000 517 LXI H-82400 J CRT BAUD RATE 

E873 70 518 NOV ft, I 

E874 D3F1 519 OUT CTR1P 

E87S 7C 520 NOV ft . H 

E877 03F1 521 OUT CTR1P 

£879 3ECE 522 NV I A.ST2 OR RUX OR CL8 

E87B 03F7 523 OUT USCC 

E8?D 3E27 524 HVI A.TXEH OR DTR OR RXEN OR RTS 

E8*F D3F7 525 OUT USCC 

£881 3E3S S26 NV 1 ft,CTROS OR H0DE3 OR RLLN 

£885 D3F3 527 OUT I TCP 

E885 21BA02 528 LXI N,B0110 ; TTY BAUD RATE 

ES88 70 529 NOV A, I 

E889 D3F0 530 OUT CTROP 

EB8B 7C 531 NOV A,H 

E88C D3F0 532 OUT CTROP 

E88E 3ECE 533 HVI A.ST2 OR RltX OR CL8 

E8S0 D3F5 534 OUT TTYE 

E892 3E25 535 HVI A,TXEH OR RKEN OR RTS 

E894 63F5 536 OUT TTYC 

537 ; 

538 i 0. DETERHIHE IF INTEGRATED CONSOLE PRESENT 

539 ,' 

E996 2EFF 540 HVI L.ITIHO ; LOAD TIHEOOT CONSTANT 

541 BR4i 

EB9B OBCl 542 IN IOCS ; INPUT DBB STATUS 

E99A E607 543 AN1 I8F OR 08F OR FO; MASK OFF STATUS FLAGS 

5** I AND TEST FOR SLAVE PRESENCE 

E89C CAACE8 545 JZ BS5 j JUHP IF INTEGRATED CONSOLE PRESENT 

E89F CD07EA 5 4*. CALL BDtY ; DELAY 1 HS FOR ANY RESETS TO COMPLETE 

E8« CD07EA 547 C«LL BIH.Y ; DELAY 1 HS 



t S IS- 1 I 8080/8085 MACRO ASSEMBLER. V2.0 MODULE PAGE 

IH.TELLEC SERIES II MONITOR. VERSION 1.2. 4 JANUARY 1)78 



11 



IOC OBJ 



SEQ 



SOURCE STATEMENT 



E8f>5 2D 

E8A6 CACEE8 

E8A9 C39BE8 

:9ftC 3E11 

E8AE 03C1 

E8B0 2EFF 

E8B2 OBC1 

E8B4 £607 

EBB6 FE01 

E8B8 CAC8E8 

E9BB CD07EA 

E8BE CD07EA 

E8C1 2D 

E8C2 CACEE8 

E8C5 C382E8 

E8C8 DBCO 

E8CA OF 

E8CB DAD6E8 

E8CE 2A0400 

ESDI 2ECC 

E803 3E01 

E8D5 77 



E8D6 AF 
E807 2F 
E8D8 FS 



5899 DB7B 

E8DB E608 

E8DD CAQCE9 

E8E0 !>B7B 

EBE2 OF 

E8E3 D27AE9 



E8E6 210010 

E8E9 1118EA 

E8EC 0807 

E8EE 1A 

E8EF 77 

E8F0 23 

E8F1 13 



S48 




OCR 


L 


S49 




JZ 


BSB 


350 




J (IP 


BS4 


SSI 


BS5: 






552 




HV1 


A, CRTS 


S53 




OUT 


IOCC 


554 




HVI 


L.ITIMO 


555 


BS6i 






556 




IN 


IOCS 


557 




ANI 


IBF OR OBF OR FO 


5SB 




CPI 


DBF 


559 




J2 


BS7 


560 




CALL 


BDLY 


S61 




CALL 


BDLV 


362 




OCR 


L 


563 




JZ 


BSB 


364 




JMP 


8S6 


S6S 


B87i 






566 




IN 


IOCI 


367 




RRC 




368 




JC 


BS9 


369 


BS8! 






570 




LHLD 


HERTOP 


571 




HVI 


L.BLOC+1 AND LBN 


372 




MV1 


A. ICNP 


373 




NOV 


N. A 


374 


BS9s 






573 


; 






376 


j 


E. 


LOAD ISIS. TO IF 


577 


# 






578 




XRA 


A 


579 




CNA 




380 




PUSH 


PSW 


581 








582 








5B3 








SB4 




IN 


D8TS 


585 








586 




ANI 


00001DOOB 


587 




JZ 


BS1I 


588 




IN 


DSTS 


589 




RRC 




590 




JHC 


8SX1 


591 








392 








393 








394 








395 




LXI 


H, 1000H 


396 




LXI 


D.IOPB 


597 




HVI 


B.7 


598 


NLPi 






599 




LOAN 


D 


600 




NOV 


N. A 


601 




IHX 


H 


602 




INN 


D 



i DECREMENT TIMER 

; JUMP IF TINE EXPIRED 

; OTHERWISE TRY AGAIN 

J LOAD CRT DEVICE STATUS COHNAHD 

J OUTPUT CONNAND TO IOC CONTROL PORT 

! LOAD TINEOUT CONSTANT 

INPUT DBB STATUS 

MASK OFF STATUS FLAGS 

TEST FOR SLAVE DONE) SOMETHING FDR THE MASTER 

JUMP IF DONE 

DELAY 1 NS FOR ANY RESETS TO COMPLETE 

DELAY 1 N6. 

DECREMENT TIMER 

JUMP IF TIME EXPIRED 

OTHERWISE' TRY AGAIN 

INPUT CRT DEVICE STATUS FROM DBB 

TEST FOR CRT READY 

JUMP IF READY (INTEGRATED CRT PRESENT) 

INTEGRATED CRT NOT PRESENT/READY SO RECORD THIS FACT 

LOAD TOP OF MEMORY PAGE ADDRESS 

i LOAD CONFIGURATION ADDRESS 

LOAD INTEGRATED CONSOLE HOT PRESENT 

STORE IN CONFIGURATION BYTE IH EXIT TEMPLATE 



G - OFFH 

E-VALUED FLAG: 

FFH IF HEITHER FDCC NOR I SD SELECTED 

OH IF FDCC SELECTED 

IH IF ISD SELECTED 

LE FDCC STATUS 

US > OOH IF HO COHTROLLER PRESEHT 

DCC CONTROLLER PRESEHT? 

TO ISD SECTIOH IF FDCC HOT PRESENT 
LE FDCC STATUS AGAIN 
E READY STATUS ROTATED INTO CARRY BIT 

TO HONITOR IF FDCC COHTROLLER PRESEHT 
HD DRIVE HOT READY 

FOLLDIUHG CDDE IS USED TO WRITE THE DISK IOPB TO 
ESSOR MEMORY SO THAT IF ICE IS BEING USED TO DEBUG 
BOOT/MONITOR. THE DISK CONTROLLER CAN ACCESS THE IOPB 

POIHTER TO DESTINATION MEMORY 

POINTER TO SOURCE MEMORY FOR IOPB 

IOPB LENGTH COUHT 



; A-RE 


; THRE 


; o 


: 


i 


; SAMP 


J STAT 


; IS F 


i JUMP 


J SAMP 


; DRIV 


1 JUMP 


; A 


; THE 


i PROC 


; THE 


i LOAD 


; LOAD 


; LOAD 



LOAD BYTE OF IOPB 
MOVE TO MEMORY 
INCREMENT IOPB POIHTER 
INCREMENT MEMORY POIHTER 



tSIS-II 8080/8085 MACRO ASSEMBLER. V2.0 MODULE PACE 
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12 



IOC OBJ 



SEQ 



SOURCE STATEMENT 



E8F2 03 

EBF3 C2EEE8 

E8F6 210010 

E8F9 7D 

E8FA D379 

E8FC 7C 

E8F6 D37A 

E8FF DB7B 

£801 E604 

E903 CAFFE8 

E906 Fl 

E90? BF 

E908 FS 

E909 C37AE9 



E90C 
E90F 
E911 
E912 
E913 
E9K 
E918 
E91B 
E91D 
E920 
E922 



2A0400 

2ECC 

7E 

OF 

0A7AE9 

061C 

CD21F8 

ES08 

CA7AE9 

OtlC 

CD21F8 



E92S OF 

E92i 027AE9 

E929 Fl 

E92A AF 

E92B 3C 

E92C FS 

E92D 2I18EA 

E930 0«1S 

£932 4E 

E933 CD44F8 

E936 1E04 

E938 Otlt 

E9 3A 23 

E93B 4E 

E93C C044F8 

E93F 10 

E940 C23AE9 

E943 OtlC 

E945 CD21F8 

E948 Et04 

E94A CA4SE9 



803 
104 
80S 
tOt 
607 

too 

609 
610 
til 
612 
(13 
114 
613 
(16 
617 
618 
619 
620 
621 
622 
623 
624 
623 
626 
6 27 
628 
629 
630 
(31 
632 
633 
634 
635 
636 
637 
(38 
639 
640 
(41 
642 
643 
644 
643 
646 
647 
648 
649 
630 
631 
632 
653 
(54 
(S3 
(56 
(57 



BSIOl 



OCR 


8 


JHZ 


HIP 


LXI 


H.1000H 


NOV 


A.L 


OUT 


LOUS 


NOV 


A.N 


OUT 


HI 


IN 


»STS 


AHI 


OPCPL 


JZ 


8310 


POP 


PSU 


XRA 


A 


PUSH 


PSU 


JHP 


BSX1 



DECREMENT IOPB LENGTH COUNT 

CONTINUE UNTIL ALL OF IOPB MOVED 

RELOAD POINTER TO IOPB 

A CONTAINS LSB OF IOPB ADDRESS 

LOB( IOPB) 

A CONTAINS MSB OF IOPB ADDRESS 

HICH(IOPB). START DISK I/O 

HA1T FOR FDCC TO COMPLETE 
TEST FOR DISK COMPLETION 

CET READY TO SET FLAG TO NEB VALUE 

SET A TO ZERO TO INDICATE DRIVE OTHER THAN INTEGRATED 

FLOPPV MAS ACCESSED CORRECTLY 

SAVE ON STACK 

BYPASS INTEGRATED FLOPPY BOOT 



; LOAD ISIS. TO FROH INTEGRATED DISK IF AVAILABLE 



BS1H 



BS12! 



BS13I 



LHLD 


HENTOP 


MVI 


L.BLOCtl 


NOV 


A.N 


RRC 




JC 


BSX1 


MVI 


B.RDSTS 


CALL 


I0CDP1 


AHI 


DPRNT 


JZ 


ssxi 


MVI 


B.RDSTS 


CALL 


I0CDP1 


RRC 




JHC 


BSX1 


POP 


PSU 


XRA 


ft 


INR 


A 


PUSH 


PSU 


LXI 


H, IOPB 


MVI 


8.HP8C 


MOV 


CM 


CALL 


I0CDP2 


MVI 


E.PARNL 


MVI 


B.MPBCC 


1NX 


H 


MOV 


C.N 


CALL 


I0CDP2 


OCR 


E 


JHZ 


8S12 


MVI 


B.RDSTS 


CALL 


I0CDP1 


AMI 


OPCPL 


JZ 


8S13 



i LOAD TOP OF MEMORY PAGE ADDRESS 
AND LB8K ; LOAD CONFIGURATION ADDRESS 



TEST F 
JUMP I 
LOAD F 
READ S 
TEST F 
JUMP I 
LOAD F 
READ S 
SECOND 
TEST F 
JUMP I 
UNLOAD 
SET A 
INTEGR 
SAVE 
LOAD P 
LOAD U 
LOAD F 
SEND B 
LOAD I 
LOAD U 



OR INTEGRATED CONSOLE PRESENT 
F IOC HOT PRESENT OR FUNCTIONAL 
LOPPY DEVICE STATUS COMMAND 
TATUS FROH I/O CONTROLLER 
.OR DRIVE PRESENT 
F NOT PRESENT 

LOPPY DEVICE STATUS CONMAND 
TATUS FROH I/O CONTROLLER 

STATUS READ USED TO INSURE DRIVE READY 
OR DRIVE READY 
F DRIVE HOT READY 

STACK 
TO 1 TO INDICATE 
ATED FLOPPY UAS ACCESSED 
N STACK 

OIHTER TO IOPB 
RITE I8PB CONMAND 
IRST BYTE OF IOPB 
VTE TO IOC 

OPB LENGTH REMAINING 
RITE IOPB CONTINUE COMMAND 



MOVE POINTER TO NEXT BYTE OF IOPB 

ROVE TO C 

SEND TO IOC 

DECREMENT IOPB LENGTH 

CONTINUE UNTIL ALL DATA TRANSMITTED 

LOAD DEVICE STATUS COMMAND 

READ STATUS FROM IOC 

TEST FOR OPERATIOH CDHPLETE 

LOOP UNTIL DOHE 
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LOC OBJ 



SEfi 



SOURCE STUTEHEHT 



E94P 06 IB 

EMF CD21F8 

£952 32FE2F 

£955 87 

1936 C27AE9 

E939 210030 

E95C 11 0000 

E9SF 0(19 

£961 CD21F8 

£964 7? 

E965 IB 

E966 23 

£96? D8C1 

E9»9 E6Q? 

£969 FE01 

E9it> C267E9 

£970 DBCO 

£972 ?7 

£973 23 

£974 IB 

E975 70 

£976 B3 

£97? C267E9 



£980 
£98i 



E97A 2A0400 
E9?» 2ECC 
E9?F 7E 

OF 

DA90E9 
E98« 3613 
£986 CD21F8 
£939 OF 
E98A OF 
E93B 1641 
£931) !>AB0E9 



E990 AF 

£991 57 

£992 DBFS 

£994 E602 

E996 CA9EE9 

£999 5BF4 

£998 C3A9E9 

E99E 1641 

£990 0BF7 

£9A2 E602 



638 
659 
6 60 
661 
662 
663 
664 
665 
6 66 
667 
668 
669 
670 
671 
672 
673 
674 
675 
676 
677 
678 
679 
680 
681 
682 
683 
684 
685 
686 
687 
688 
689 
690 
691 
692 
693 
694 
695 
696 
697 
698 
699 
700 
701 
702 
703 
704 
703 
706 
707 
708 
709 
710 
711 
712 



BS14: 



KVI 


B,RRSTS i 


CALL 


IDCDPI ; 


STA 


TRKO-2 ; 


ORA 


a ; 


JHZ 


BSXi ; 


LXI 


H.TRKO ; 


LXI 


D.TRKL i 


HVI 


B.RDBC ; 


CALL 


10CDPI J 


NOV 


n, a ; 


OCX 


D i 


IHX 


H 


1H 


iocs ; 


AHI 


IBF OR 08F OR FO; 


CPI 


DBF 1 


JNZ 


8S14 ; 


IN 


ioci ; 


NOV 


H, a ; 


IHX 


N i 


OCX 


t> ; 


NOV 


a, o ; 


ORA 


E 


JNZ 


BS14 ; 



LOAD RESULT STATUS COMMAND 

READ RESULT STATUS FROM IOC 

SAVE FOR TEST LATER 

SET CONDITION CODES 

JUHP IF DISK DPERATIOH UNSUCCESSFUL 

LOAD POINTER TO DISK DESTINATION ADDRESS 

LOAD TRACK LENGTH 

LOAD DISK READ DATA COHHAHD 

LOAD DATA FRON IOC 

HOVE TO MEMORY 

DECREMENT LENGTH 

HOVE POINTER TO NEXT LOCATION 

INPUT D8B STATUS 

NASK OFF STATUS FLAGS 

TEST FOR DATA IN BUFFER 

JUMP IF HO DATA 

INPUT DATA FRON D8B 

NOVE TO NENORY 

HOVE POINTER TO NEXT LOCATION 

DECREMENT LENGTH 

LOAD D FOLLOVED BY E 

CONTINUE UNTIL DONE 



DETERMINE COLD START LOCAL CONSOLE. 



I CONSOLE IS 

BSXI: 

LHLD 

HVI 

NOV 

RRC 

JC 

NV1 

CALL 

RRC 

RRC 

HVI 

JC 



EITHER INTEGRATED CRT, SERIAL CRT, OR TTY 



HEHTOP 

l.bloc+1 and lbhk 

a.h ; 

BSX2 ; 

B.KSTS ; 

iocdpi ; 



D, ICFG 
8SXS 



LOAD TOP OF HEHDRY PAGE ADDRESS 

; LOAD CONFIGURATION ADDRESS 

LOAD INTEGRATED CONSOLE FLAG 

TEST FOR INTEGRATED CONSOLE PRESENT 

JUHP IF INTEGRATED CONSOLE NOT PRESENT 

LOAD KEYBOARD STATUS COHNAHD 

READ STATUS FROM tOC 

TEST FOR KEYBOARD PRESENT 

LOAD INITIAL CONFIGURATION 

JUHP IF KEYBOARD PRESENT 



: CONSOLE IS 

85X2: 

XRA 

NOV 

IN 

ANI 

JZ 

IN 

JHP 



EITHER SERIAL CRT OR TTY 



BSX3: 



HVI 

IN 

ANI 



A 

D.A 

ITYS 

RRDY 

8SX3 

TTYI 

8SX4 

D.1CFC 

uses 

RRDY 



ZERO A 

D CONTAINS OH, I . E . C«T, R*T , P«T, L« T 

GET TTY STATUS 

IS IT READY? 

JUHP IF TTY HOT READY 

OTHERWISE GET CHARACTER FRON TTY 



LOAD INITIAL CONFIGURATION STATUS 
GET SERIAL CRT STATUS 
IS IT READY/ 
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LOC OBJ 



SE9 



SOURCE STATEMENT 



£934 CA90E9 

E9A7 DBF6 

E9S9 E67F 

E9AB FE20 

E9SD C290E9 



E9BO 210300 

E9B3 72 

S3B4 2E06 

£986 72 



E9B? CD03EB 



E93A Fl 
E9BB B7 
E9BC C2CEE9 
E9BF DB7B 

B7 

C2FCE9 



:9C! 
E9C2 
E9C5 DB7B 
E9C7 OF 
E9CB D2F1E9 



E9CB C3E2E9 

S9CE 07 

E9CF DAF1E9 

E9D2 3AFE2F 

E9D5 B7 

E9D6 C2FCE9 

E9D? -361C 

E90B CD21F8 

E9DE OF 

E9DF D2F1E9 

E9E2 3ED3 

E9E4 32FE2F 

E9E7 3EFF 

E9E9 32FF2F 

E9EC 3E04 

E9EE C3FE2F 



713 
714 
715 
716 
717 
718 
719 
720 
7 21 
722 
723 
724 
725 
726 
727 
728 
729 
730 
731 
732 
733 
734 
735 
736 
737 
73B 
739 
740 
741 
742 
743 
>44 
745 
746 
747 
748 
749 
750 
751 
752 
753 
754 
755 
756 
757 
758 
759 
760 
761 
762 
763 
764 
765 
766 
767 



8SX4: 



JZ 
IN 

ANI 
CP1 
JHZ 



BSX2 
ttSCI 

7FH 

8SX2 



JUMP BACKWARDS IF CRT HOT READY 
OTHERWISE, GET CHARACTER FROM CRT 

MASK OUT PARITY BIT 

DID USER TYPE IN A SPACE CHARACTER? 

START ALL OVER IF NOT A SPACE CHARACTER 



; AT 
BSX5-' 



THIS POINT THE CONSOLE DEVICE HAS BEEN DETERMINED 



8SX6! 



BSXB-' 



LKI 
NOV 
MV1 
NOV 

G. 

CALL 



JNP 



H, I08YT 

N.D 

L. INITIO 

N.D 



ML POINTS TO I/O STATUS BYTE 
REPLACE MODIFIED 170 STATUS BYTE 
HL POIHTS TO INITIAL I/O STATUS BYTE 
SET INITIAL I/O STATUS BYTE 



CALL THE DIAGNOSTIC PROGRAM 

D1AGBT 

IF DISK IS READY. TRANSFER TO ISIS. TO 



POP 


PSU 


ORA 


A 


JHZ 


BSXfc 


IN 


RSTS 


ORA 


A 


JNZ 


BSX10 


IN 


DSTS 


RRC 




JNC 


BSX9 



BSX8 



RLC 




JC 


8SX9 


LDA 


TRKO-2 


ORA 


A 


JHZ 


BSXtO 


NVI 


B.RDSTS 


CALL 


I0CDP1 


RRC 




JNC 


BSX9 


NVI 


A. (OUT 


STA 


TRKO-2 


NVI 


A, CPUC 


STA 


TRKO-1 


MVI 


A.BTDGO 


JMP 


TRKO-2 



CPUC) 



UNLOAD FLAG 

SET CONDITION CODES 

JUMP IF INTEGRATED COHSOLE ACCESSED 

SAMPLE FDCC RESULT STATUS 

SET CONDITION COOES 

JUNP IF ERROR CONDITION 

SAMPLE FDCC STATUS 

IS IT READY? 

JUNP TO NONITOR IF DISK NOT READY 

OTHERWISE. PRIOR TO TRANSFERRIHG CONTROL 

TO TO. BOOT. URITE AN INSTRUCTION TO 

TURN OFF BOOTSTRAP PROH 



TEST FOR HON DISK ACCESS 

JUMP IF HO ACCESS 

LOAD TEMPORARY STORAGE FOR RESULT BYTE 

SET CONDITION CODES 

JUNP IF ERROR CONDITION 

LOAD FLOPPY DEVICE STATUS COMMAND 

READ STATUS FROM I/O CONTROLLER 

TEST FOR DRIVE READY 

JUNP IF HOT READY 

LOAD OUTPUT INSTRUCTION 
STORE IN RAH BEFORE DISK BOOT 
LOAD PORT ADDRESS 

TURN OFF BOOTSTRAP/DIAGNOSTIC RON 
EFFECT IS SANE AS: NVI A.BTDGOF 
OUT CPUC 
JMP TRKO 



OTHERWISE. TYPE SIGH-ON FOR RAN MONITOR 
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4 JANUARV 1878 



IS 



IOC 3BJ 



E9Ft 211FEA 
E9F4 3(18 
E9F6 CDOEEA 



E9F9 C3O0F8 



►9FC 213ftEft 

E9FF 360E 

EftOl CDOEEft 

EAQ4 C3FIE9 



EAO? 3E70 

EA09 3D 

EAOA C209EA 

EAOD C9 



EAOE 
EAOF 
EA12 
EA13 
EA14 
EA17 



EA16 
EA19 
EA1A 
EA18 
EA1C 
EA 10 



4E 

CD09F8 

23 

OS 

C20EEA 

C> 



80 
04 
1A 
00 
01 
0030 



EA1F OD 

EA20 OA 

EA21 93493248 

EA29 49332049 



SEA 

768 BSX9: 

769 

770 

771 

772 ; 

773 ; 

774 ; 
775 

7 76 ; 

777 ; 

778 ; 

779 BSX10 
780 

781 
782 
783 
784 

785 ; 

786 ; 

787 ; 

788 BDLY! 
789 

790 BDLri: 

791 

792 

793 

794 ;*-*-• 

793 ; 

796 ' 

79 7 ; 

798 PRTM : 

799 

800 

801 

802 

803 

804 

805 ;*-♦-• 

806 ; 

807 : 

808 ; 

809 IOPBt 
810 

811 
812 
813 
814 
815 

816 i 

817 ; 

818 i 

819 VERS: 



SOURCE STATEMENT 



LX1 
MVI 
CALL 



JHP 



H, VERS 
B,LVER 
PRTH 



HL POIHTS TO ADDRESS OF S1GN-0H MESSAGE 
B CONTAINS LENGTH OF NESSAGE 
PRINT SIGN-ON MESSAGE 



K. 



BOOTSTRAP ALL DONE. SO BRANCH TO MONITOR. 

BEGIN i AT THIS POINT, INTERRUPTS ARE PISABLEP 

PRINT DISK ERROR MESSAGE 



LXI N.ERNSG 

NVI B.LERH 

CALL PRTH 

JHP BSX9 



; HL POIHTS TO ADDRESS OF DISK ERROR HES8AGE 

; B CONTAINS LENGTH OF HESSACE 

; PRINT SIGN-OH MESSAGE 

; PRIHT NESSAGE 



-»-»-♦-*-*-•-•-*-•-»-*-*-•-•-»-•-»-*-»-»-•-•-»-»-»-»-•-•-»-•-*-•-•-•-*-< 



BDLr 



NVI 

OCR 
JNZ 
RET 



BOOTSTRAP DELAr 1 MS SUBROUTINE 



C.ONENS 

C 
BDLT1 



LOAD 1 MS. CONSTAHT 

DECREMENT COUNTER 
JUMP IF NOT EXPIRED 



PRTH 



NOV 
CALL 
I NX 

DCR 
JNZ 
RET 



PRT SUBROUTINE FDR SIGH-ON HESSAGES 



C,H 

COP 

H 

8 

PRTH 



; C CONTAINS A CHARACTER FROM THE MESSAGE 
; PRIHT ON CONSOLE 



; KEEP LOOPING UNTIL ENTIRE NESSAGE IS OUTPUT 



DISK I/O PARAMETER BLOCK 



08 
DB 
DB 
DB 
DB 
DM 



SON 

04H 

26 

D 

1 

TRKO 



I0CN, NO UPDATE BIT SET 

I/O INSTRUCTION, READ DISK 

READ 26 SECTORS 

TRACK 

SECTOR 1 

LOAD ADDRESS 



MONITOR SICN-ON NESSAGE 

DB CR.LF. 'SERIES II MONITOR, V 
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LOC 3BJ 

EA29 49204D4F 

EA2D 4E49544F 

E A 31 522C2056 

EA35 31 

EA36 2E 

EA3? 32 

EA38 OD 

E939 OA 
0018 



EA3A OD 
EA38 OA 
EA3C 4449534B 
EA40 20455252 
EA44 4F52 

OD 

OA 



£ ftU 

:»47' 

aoot 

EA48 A6 



EAC8 

Eft CO 

EftCS EE 

EAC9 DD 

EACA CC 

EACB BB 

EACC 00 



EACD FE 
EACE FF 
EACF AA 
EAOO 
EAD1 



CO 
00 



EAD2 F3 

EAD3 Dl 

EA04 CI 

EA05 Ft 

EA06 D3FC 

EAP8 Ft 

EAD9 El 

EADA F9 

EADB 213412 

EAOC 



SEfl 



8 20 



SOURCE 5TATEHEHT 



OB 



YER/10**0' . ' .' ,VER HOD 10*'0* 



821 

822 LVER 

823 ; 

824 ; 

825 i 

826 ERHSC* OB 



DB CR.LF 

EBU 8-VERS 1 LENGTH OF SICH-DH MESSAGE 

MONITOR ERROR SIGN-ON MESSAGE 

CR.LF, 'DISK ERROR' ,CR. LF 



827 
828 
829 
830 
831 
832 
833 
834 
835 
836 
B37 
838 
839 
840 
841 
842 
843 
B44 
845 
846 
847 
848 
B49 
850 
851 
B52 
853 
854 
855 
856 
857 
858 
859 
860 
861 
862 



LERM EQU J-ERHSC 
BICKStl: DB 0A6H 



; LENGTH OF ERROR SIGM-ON MESSAGE 
; BOOT CHKSUMS TO 55H 



EXIT CODE TEMPLATE, TO BE EXECUTED IN RAN 
THIS CODE IS ORIGINATED SO AS TO BE ALIGNED 
AGAINST THE TOP OF A PAGE (1 PAGE * 256 BYTES) 



TOS: 
USER 
ELOC 
DLUC 
CLOC 
BLOC 



HOC: 
FLOC 
ALOCi 

SLOC: 

EXIT: 



LLOC 



ORG 

EBU 
DB 

DB 
OB 
DB 
D8 



DB 
DB 
DB 
DB 
DB 



DI 

POP 

POP 

POP 

OUT 

POP 

POP 

SPHL 

LXI 

EOU 



BBASE t 02C8H 

T0S-8 

DEEH 

ODDH 

OCCH 

06 BH 

D 



HOT INTO 

DFFH 

OAAH 

USER AMD HHSK 





PSU 

S0CP1 

PSW 

H 

H. 1234H 
8-2 



STACK 
UORK STACK 



CRT 
CRT 



IS PRESEHT 
NOT PRESENT 



BASE OF MONITOR WORK 
BASE OF DEFAULT USER 
E REGISTER STORAGE 
D REGISTER 
C REGISTER 
B REGISTER 
CONFIGURATION BYTE 
SIT < IF INTEGRATED 
> 1 IF INTEGRATED 
IHTERRUPT MASK 
CPU FLAGS 
A REGISTER 
LOV(SP) 
HICH(SP) 



MONITOR STACK ORIGIN 

DISABLE INTERRUPTS TO PROTECT THIS SE8UEHCE 

RESTORE D,E 

RESTORE B,C 



RESTORE A AND FLAGS 

RESTORE ORIGINAL STACK VALUE 

RESTORE H.LJ 1234H IS FILLER WHICH HILL BE 
OVERHRITTEH BY RESTART ROUTIHE 
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i.0C OBJ 

EAOD 

EADE FB 

EADF J38967 



EAE1 

EAE2 0000 

EAE4 90 

EAE5 0000 

EftE? 30 



EAE8 C30000 

SAEB C30000 

EAEE C30000 

5AF! C30000 

EAF4 C30000 

EAF? C30000 

EAFA 030000 

EAFD =30000 



.JO JO 




9001 




5002 




0003 




.10 04 




3035 




0006 




000? 




EBOO 




f B03 




1830 




:800 


C9 


:B01 


00 


EB02 


JO 


5B03 


:? 



SES 

863 
664 
865 
866 
86? 
868 
869 
870 
871 
872 
873 
874 
875 
876 
8 77 
878 
B79 
880 
681 
882 
883 
884 
885 
886 
887 
8B8 
689 
890 
891 
892 
893 
894 
895 
8 96 
897 
698 
899 
900 
901 
•02 
903 
904 
905 
906 
907 
908 
909 
910 
911 
♦ 12 
913 
914 
915 
916 
917 



SOURCE STATEMENT 



HLOC 



PLOC 
TLOC: 



XTBLi 

CROC: 
COIOC: 
RlLOCs 
R2L0C: 
PILOC: 
P2L0C: 
L1L0C! 
CSLOCi 
E H X '. 



EflO 

EI 

JHP 



EOU 

OH 

08 

08 

OB 



JHP 
JHP 
JHP 
JHP 
JHP 
JHP 
JHP 
JHP 



»-l 
6789H 

8-1 



; ENABLE INTERRUPTS 

I RETURN TO INTERRUPTED CODE; 6789N IS FILLER 
i HHICH WILL BE OVERURITTEN BY ' G ' COMMAND 

J AND RESTART ROUTINE 

i TRAP 1 ADDRESS 

> TRAP I VALUE 

) TRAP 2 ADDRESS 

; TRAP 2 VALUE 

; EXTENSIBLE I/O ENTRY POINTS 

I FILLED IN UHEH USER CIVES ADDRESS OF OUH 

1 DRIVER ROUTINE VIA IODEF SYSTEM CALL IN MONITOR 



THIS LABEL SHOULD BE AT OEAOOH. 



; SELECTION CODES FOR USER 1/0 ENTRY POINTS 

UCI EOU (CILOC-XTBD/3 

UCO EBU (COLOC-XTBD/3 

UR1 EBU (R1L0C-XTBL >/3 

UR2 E6U ( R2L0C-XTBL >/3 

UP1 EOU (P1L0C-XTBL >,3 

UP2 EOU (P2L0C-XTBL >/3 

UL1 EOU < L1L0C-XTBL >/3 

UCS EBU (CSLDC-XTBD/3 

: END OF BOOTSTRAP PROM CODE 

{lift***************************!***********************************************! 



OIAGMN EBU 



DIAGBT EBU 



ORG 



RET 
HOP 
NOP 
RET 



OEBOOH 



DEB03H 



OEBOOH 



STARTINC ADDRESS OF DIAGNOSTIC PROCRAH 

WHEN ENTERED FROH CALL FROM MONITOR 

STARTINC ADDRESS OF DIAGNOSTIC PROCRAH 

WHEN ENTERED FSOH CALL FROH BOOT 
UHEH BURNING THE PROM, THIS SECTION OF 

HILL BE OVERLAYED 

PROGRAM. 



CODE 

THE REAL DIAGNOSTIC 



0EBD3H 

BOOTSTRAP/DIAGNOSTIC PROH 
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IOC OBJ 



SEO 



SOURCE STATEMENT 



MOO 
F800 



*800 
F803 
►BO* 
F809 
F80C 
FBOF 
F812 
F815 
F818 
F8I8 
F81E 
F821 
F824 
F826 
F829 
FB2C 
F82F 
FB30 
F834 
F838 
F83C 
F840 
F841 
P844 



C35IF8 

C3BEFB 

C30FFC 

C39FFC 

C3E9FC 

C31EFD 

C344FD 

C383FD 

C3B7FD 

C3SCFD 

C394FD 

C37FFF 

0104 

C3ADFD 

C3SEFD 

C3CEF0 

12 

28432949 

4ES4454C 

20434F52 

3031393? 

38 

C3ASFF 

C384FF 



918 
919 

920 
921 
922 
923 
924 
925 
92* 
927 
928 
929 
9 30 
931 
932 
933 
934 
933 
936 
937 
938 
939 
940 
941 
942 
943 
9 + 4 
945 
946 
947 
948 
949 
950 
951 
932 
953 
954 
955 



956 
937 
938 
959 



; •****« 
; •**••* 
;•«*•*• 
; *•* 
;*•* 
;««* 
; •****» 
;*•*••* 
; **»*•» 
BASE 



•**•*«*********»«**«*««***«*««»***••*********«**«****»*•«****••«♦*•«** 
*****•*•*****•*****••**•••*••****•***•******»****»**»********•*•****** 

**»***•*«»*•***»«*«•*«**»*«**»*•**•*******«*•*«•«********»«**«•«****** 

START OF NOHITOR PROPER 

A********************************************************************* 
****** •*•*•****»**«****»•**•*•****•«**»»*****************•***********» 
•to****************************************************************** 
SET OF800H i BASE ADDRESS OF MONITOR 

ORG BASE ; TOP 2K OF 64K ADDRESS SPACE 

*-«-*-•-♦-♦-*-*-*-«-*-*-»-«-*-•-*-*-*-«-•-«-»-»-«-«-♦-*-*-•-«-*-•-»••*- 



• »< 
**a 

**• 

• * i 

**• 
**i 

• *« 
*•• 

**i 



BRAHCH TABLE FOR I/O SYSTEM (EXTERNAL I/O ENTRY POINTS) 



; THE 

i THI 

; IN 

i THE 
BE6IN 



MONITOR IS ENTERED AT ENTRY POINT 'BEGIN' VIA A 
S IN TORN LEADS TO A JUMP TO ENTRY POINT 'START' 
THIS -TABLE* ARE EXTERNAL I/O ENTRY POINTS KN08H TO THE USER PLUS 

DATE. VERSION. AND COPYRIGHT STAMPS. 



JUMP FROM THE BOOTSTRAP! 
THE OTHER ENTRIES 



JMP 

JHP 

JMP 

JHP 

JMP 

JMP 

JHP 

JMP 

JMP 

JMP 

JMP 

JMP 

DA 

JMP 

JMP 

JMP 

DB 

DB 



STARTO 

CI 

RI 

CO 

PO 

LO 

CSTS 

IOCHK 

IOSET 

HENCHK 

IODEF 

I0CDR1 

DATE 

UI 

HO 

UPPS 

VERB 

'COINTEL C0RP1978' 



RESET ENTRY POINT 

LOCAL CONSOLE INPUT 

READER INPUT 

LOCAL CONSOLE OUTPUT 

PUNCH OUTPUT 

LIST OUTPUT 

LOCAL CONSOLE INPUT STATUS 

I/O SYSTEM STATUS 

SET I/O CONFIGURATION 

COMPUTE SIZE OF MEMORY 

DEFINE USER I/O ENTRY POINTS 

IOC INPUT 

DATE STAMP FOR MONITOR ROM 

UPP INPUT 

UPP OUTPUT 

UPP STATUS 

VERSION STAMP FOR NOHITOR RON 

; COPYRIGHT NOTICE IN ASCII REP 



JHP I0CCOM 
JMP I0CDS2 

I*-.*-*-*-*-*-*-*-*-*-*-*-*-*-*- 



,' IOCCOM ENTRY POINT 
i IOC OUTPUT 

»-*-*-*-*.*.«. *.*-*.*.*.*. *.*.*. 



■*-*-*-«-• 



60 ; 

61 I 

62 ; 

63 ; 

64 i 
63 ; 
66 1 
6? i 
68 J 



'ERROR' - ENTERED VIA JUMP FROM VARIOUS ROUTINES 8HEH AH ERROR IS DETECTED 

PROCESS: ABNORMAL EXIT FOR ALL MONITOR ERROR CONDI TI-OMS . BECAUSE OF THE 

UNKNOWN STATE OF THE MONITOR AS A RESULT OF A COMMAND OR DATA ERROR, 
THE VALUE OF THE MONITOR STACK POINTER IS REINITIALIZED AND 
EXECUTION CONTINUES TO THE MAIN CONMAHD LOOP. 

INPUT: MENTOR, TOS 

OUTPUT: SP POINTS TO BASE OF MONITOR STACK IN TOP PACE OF CONTIGUOUS RAH 

MODIFIED: H.L, SP 

STACK USAGE: 
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LOC OBJ 



SEQ 



SOURCE STATEMENT 



F847 2A0400 

F84A 2EC8 

?84C ?9 

F84D CDDEFC 

F850 23 



F 851 3E04 

F85s D3FF 

'855 F6 

F856 CDFEFD 

F85? CDDEFC 

?85C IE 

F 850 CD61FF 

FB60 FEOD 

«8i2 0A55F8 

F8S5 0641 

*S6? FA47F8 

F86A 0E02 

e 86C 1155F8 

F8SF 95 



F8?0 2I82F8 
F8'3 FE1A 



969 

970 

971 

972 

973 

974 

975 

976 

977 

978 

979 

980 

981 

982 

983 

984 

985 

986 

987 

983 

989 

990 

991 

992 

993 

994 

995 

996 

997 

998 

999 

1000 

1001 

1002 

1003 

1004 

1005 

1006 

1007 

1008 

1009 

1010 

1011 

1012 

1013 

1014 

1015 

1016 

1017 

1018 

1019 

1020 

1021 

1022 

1023 



RECISTER USAGE 

X ' MODIFIED BY THIS ROUTINE. CONTENTS UNDEFINED. 
S • SET BY THIS ROUTINE. RETURNED AS A RESULT. 
U * USED AS INPUT. 



A - 
B - 
D - 
H - X 
CARRY - X 
SIGH - X 
SP - S 
STACK USACE: 



C - S 
E - 

L - X 
ZERO - 
PARITY 
PC - 
BYTES 



ERROR: 



LHLD 

NVI 
SPHL 
CALL 
08 



HEHTOP 

L.TOS AND OFFH 

cone 

■ •* 



; H POINTS TO TOP PAGE OF MEMORY 

; L POINTS TO BASE OF STACK WITHIN THAT PAGE 

i SP NOV POINTS TO BASE OF MONITOR STACK 

i OUTPUT THE ERROR INDICATOR CHAR 'I' 

; FALL THROUGH TO MAIN COMMAND LOOP 



*-»-*-*-*-*-«-«-«-♦- 



MAIN COMMAND LOOP. 



-*-*-»-»-«-*-»-»-«• 



•«-*-*-*-*-*-* 



THIS 
IT IS 
A FAL 
ROUT! 
IN TH 
AND L 
UHEH 
IS CH 
STARTO; 



START i 



LOOP IS THE STARTIHG POINT OF ALL COMMAND SEQUENCES. 

ENTERED VIA A JUMP FROM THE BEGINNING OF THE MONITOR PROPER CODE. 
L THROUGH FROM THE ERROR ROUTINE, OR A RETURN FROM A MONITOR COMMAND 
NE. 

IS CODE INTERRUPTS ARE ENABLED AND A CARRIAGE RETURN 
INE FEED ARE TYPED ALONG KITH THE PROMPT CHARACTER. ' ' 
A CHARACTER IS ENTERED FROM THE LOCAL CONSOLE KEYBOARD, IT 
ECKED FOR VAL I D 1 TY , THEN A BRANCH TO THE PROPER 



MV1 
OUT 

EI 

CALL 

CALL 

DB 

CALL 

CPI 

JZ 

SUI 

JH 

NVI 

LXI 

PUSH 



LXI 
CPI 



A.BTDCOF 
CPUC 



CRLF 
COHC 

Tl 

CR 

START 

• A' 

ERROR 

C,2 

D, START 

D 



H.CTBL 
LCT 



DISABLE BOOT, I.E. SWITCH BOOT PROM 
OUT OF ADDRESSABLE MEMORY SPACE 

ENABLE INTERRUPTS 
TYPE <CR>,(LF> 
OUTPUT A PERIOD 

GET A CHARACTER, ECHO IT . 

IS IT A CARRIAGE RETURN? 

JUMP IF IT IS 

OTHERWISE TEST FOR A-Z (VALID COMMAND RANGE) 

LESS THAN A, HOT A VALID COHHAHD 

ASSUME THE COMMAND HEEDS 2 PARAMETERS 

SET UP PSEUDO RETURN ADDRESS TO SIMULATE 

EFFECT OF A CALL. CDMHAHDS WHICH PERFORM 
A RETURN WILL CAUSE THE STACK TO BE 
POPPED, THUS RETURNING TO EHTRY POINT 
START. THE 'G' CONNAND, HOWEVER, WIPES 
OUT THIS ADDRESS WITH ANOTHER ADDRESS 
OF ITS OWN CHOOSING (I.E. USER'S PC > . 

LOAD POINTER TO PROCESSING ROUTINE PTRS 

TEST FOR OVERRUN 
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tOC OBJ 



SCO 



SOURCE STATEMENT 



F875 F247FJ 

F878 5F 

F879 1600 

F87B 19 

FB7C 19 

F87D 7E 

F87E 23 

F8 7F 66 

F890 6F 

F 631 E9 



F832 
'884 
f 886 
- 8 88 
F88H 
F88C 
F83E 
F890 
F892 
F894 
F8 96 
F898 
F89A 
= 89C 
F89E 
F 3<%0 
F8A2 
F 8A4 
F8A6 
F8AB 
F8AA 
F8AC 
F8AE 
F8B0 
F8B2 
F 834 
001ft 



86F8 
47F8 
47F8 

5FF9 
7DF9 
8CF9 
D5F9 
47F8 
47F8 
47FB 
47 F8 
F0F9 
01FA 
47 F 8 
47F8 
14FA 
52FA 
BFFA 
47F6 
47F8 
47F8 
DDFA 
26FB 
47F8 
*6FB 



1024 
1025 
1026 
1027 
1028 
1029 
1030 
1031 
1032 
1033 
1034 
103S 
1036 
1037 
1038 
1039 
1040 
1041 
1042 
1043 
1044 
1045 
1046 
1047 
1048 
1049 
10 SO 
1051 
1032 
1053 
1054 
1055 
1056 
1057 
1058 
10 59 
1060 
1061 
1062 
1063 
1064 
1065 
1066 
1067 
1068 
1069 
1070 
1071 
1072 
1073 
1074 
1075 
1076 
10 77 
1078 



JP 



ERROR 



MOV 


E 


A 


MVI 








DAD 







DAD 







MOV 


A 


M 


IHX 


H 




MOV 


H 


N 


MOV 


L 


A 


PCHL 







; IF SO. THEN ERROR 

; OTHERWISE, MOVE INDEX TO DE 



1 ML •■' CTBLBASE ♦ (2 * INDEX); HL NOV POINTS 
i TO PROPER COMMAND IN CONNAND BRANCH TABLE 

i GET LSB OF BRANCH LOCATION 

: GET MSB OF BRANCH LOCATION 

i HL POINTS TO ADDRESS OF COMMAND CODE 

: TAKE THE 8RANCH 
I-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-***-*-*-*-*-*-*-*-*-*-*-*-*-*-* 



COMMAND BRANCH TABLE. 



THIS TAB 

ALL THE 

COMMAND 

IS AH ER 

CHARACTE 

CTBL: 

DU 
DM 
ON 
DM 
DV 
DM 
DV 
DU 
DU 
DU 
DV 
ON 
DV 
DV 
DV 
DV 
DV 
DV 
DU 
DU 
DU 
DU 
DU 
DV 
DU 
DU 
Efil 
> -» - 



LCT 



LE COHTAIHS T 
COMMAND PROCE 
LOOP. HOTE T 
ROR CONDITION 
R EXISTS. 

ASSIGN 
ERROR 
ERROR 
D1SP 
EOF 
FILL 
GOTO 
HEXN 
ERROR 
ERROR 
ERROR 
ERROR 
MOVE 
NULL 
ERROR 
ERROR 
OUERY 
READ 
SUBS 
ERROR 
ERROR 
ERROR 
WRITE 
X 

ERROR 
Z 

( *-CTBL 
-•-i ♦-*-*- 



HE ADDRESSES OF THE ENTRY POINTS OF 
SSIHG ROUTINES. IT IS ENTERED FROM THE 
HAT AH ENTRY TO 'ERROR' 
, I.E., HO COMMAND CORRESPOND I HG TO THAT 



MAIN 



>/2 
»- *- 



A - 
B - 

C - 
D - 
E - 

F - 
G - 
H - 
I - 
J - 
K - 
L - 
M - 
H - 
- 
P - 
- 
R - 
S - 
T - 
U - 

V - 

V - 
X - 

V - 
Z - 
LCT 



ASSIGN I/O UNITS 



DISPLAY RAM MEMORY 

ENDFILE A HEXADECIMAL FILE 

FILL MEMORY 

GO TO MEMORY ADDRESS 

HEXADECIMAL SUN AND D1FFEREHCE 



HOVE MEMORY 
PUHCH NULLS 



FOR LEADER OH PAPER TAPE 



OUERY I/O SYSTEM STATUS 

READ HEXADECIMAL PAPER TAPE FILE 

SUBSTITUTE MEMORY 



VRITE FILE TO PAPER TAPE IN HEX FORMAT 
EXAMINE AHD MODIFY REGISTERS 

INVDKE THE DIAGNOSTIC PROGRAM 

» NUMBER OF U-BIT ENTRIES IN TABLE 

«-«-♦-«-«-«-*-«-«-*-*-«-*-«-*-«-« 



'A' COMMAND - ASSIGN I/O DEVICE 

THIS ROUTINE NAPS SYMBOLIC DEVICE IDENTIFIERS TO BITS 

IN THE I/O STATUS BYTE (IOBYT) TO ALLOW FOR LOCAL CONSOLE 

MODIFICATION OF SYSTEM I/O CONFIGURATION. 
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IOC DBJ 



SEQ 



SOURCE STATEMENT 



F8B6 CD61FF 
F8B9 2103F? 
F8BC 0E04 



f-Vit 8E 

F8BF 23 

F8C0 CACDFB 

F8C3 23 

F8C4 23 

F8C5 23 

F8C6 00 

F8C? C2BEF8 

F8CA C347F8 



F8CD 46 

F8CE 23 

F8CF 5E 

F8D0 23 

F8D1 56 

F8D2 EB 



F8D3 CD61FF 
F806 FE3D 
F8D8 C2D3FB 



FBDB CD61FF 

F8DE FE20 

F8E0 CADBF8 

F8E3 0E04 

FBES BE 

F8E6 23 

FBE7 CAF2F8 

FBEA 23 

FBEB OP 

F8EC C2E5F8 

F8EF C347F8 



F8F2 CDtlFF 

FBF5 FEO» 

F8P7 C2F2F8 

F8FA 3A0300 

FBFD AO 



F8FE B6 



1079 
1080 
1081 
1082 
1083 
1084 
1085 
1086 
1087 
1088 
1089 
1090 
1091 
1092 
1093 
1094 
1095 
1096 
1097 
1098 
1099 
1100 
ilDl 
1102 
1103 
1104 
1105 
1106 
1107 
1108 
1109 
1110 
till 
1112 
1113 
1114 
1115 
1116 
1117 
1118 
1119 
1120 
1121 
1122 
1123 
1124 
1123 
1126 
1127 
1128 
1129 
1130 
1131 
1132 
1133 



ASSIGN: 



ASO' 



AS1 



ALUP1 



ALUP2I 



AS2i 



AS3i 
ALUP3: 



CALL 

LXI 

HVI 



CMP 

IHX 

JZ 

IHX 

IHX 

IHX 

OCR 

JHZ 

JMP 



MOV 
IHX 
MOV 
INX 
MOV 
XCHG 



CALL 

CPI 

JHZ 



CALL 
CPI 

JZ 



HVI 

cup 

IHX 

JZ 

IHX 

OCR 

JHZ 

JNP 



CALL 

CPI 

JHZ 

LDA 

AHA 



ORA 



TI 

H.LTBL 

C.4 



n 

H 

ASl 

H 

H 

H 

C 

ASO 

ERROR 



B.H 

H 

E.H 

H 

ft.H 



TI 
' *' 

ALUP1 



TI 

* * 

ALUP2 

C.4 

M 

H 

AS3 

H 

C 

AS2 

ERROR 



TI 
CR 

ALUP3 
IOBVT 
B 



; GET LOGICAL DEVICE CHARACTER (C.R.P.L) 
; ADDRESS OF MASTER TABLE 
J MAXIMUM OF 4 ENTRIES 



HL POINTS TO IDENTIFYING CHARACTER IH LTBL 
DOES A-REC CDHTAIN CR.P. OR L? 
HL POINTS TO CORRESPONDING DEVICE HASK 
VES IT DOES 



1 HL POINTS TO NEXT 4-BYTE ENTRY IN LTBL 

t DECREMENT LOOP COUNT 

; TRY NEXT ENTRY 

I HO HATCH. ERROR 



; USER HAS SPECIFIED A VALID LOGICAL DEVICE 

; B :* LOGICAL DEVICE HASK 

; HL COHTAIHS SUBORDIHATE PHYS . DEV. TBL . ADDRESS 

; E COHTAIHS LSB OF PDT ADDRESS 

; D COHTAIHS MSB OF PDT ADDRESS 

; HL POINTS TO I/O SYSTEM PHYSICAL DEVICE 

! TABLE (I.E. ACT, ART, APT. OR ALT) 



i SCAH IHPUT UHTIL 



SCAN IHPUT HHILE ' 



(BLAHK) 



J SET TABLE LEHCTH 

I IHDEX THROUGH PHYSICAL UHIT TABLE 

i COMPARE DEVICE CHAR BITH LEGAL VALUES 

1 HL COHTAIHS DEVICE SELECT BIT PATTERH 

; USER HAS SPECIFIED A VALID PHYS. DEVICE ASSIGNHNT 

i HL POINTS TO NEXT ENTRY WITHIN THE TABLE 

J CONTINUE LOOKUP 

2 ERROR RETURN 



1 SCAH IHPUT UHTIL <CR> 



; SET I/O STATUS 

I > CONTAIHS LDC DEV HASK. CLEAR OUT THE 

; APPROPRIATE FIELD IH IOBVT BECAUSE HE ARE 

1 GOIHG TO CHAHCE IT. 

I PUT IH THE NEU STATUS FIELD 



m$-IJ 6080/8 
IKTELLEC SER1 

IOC OBJ 

f8FF 320300 
F902 C9 
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F903 43 

F904 FC 

F905 13F» 

F907 52 

F908 F3 

F909 1BF9 

F90B 30 

F90C CF 

F90t> 23F9 

F90F 4C 

F910 3F 

F911 2BF» 



F913 34 

F914 00 

F915 43 

F916 01 

F917 42 

F918 02 

F919 31 

F91A 03 

F91B 94 

F91C 00 

F91D 90 

F91E 04 

F91F 31 

F920 08 

F921 32 

F922 OC 

F923 94 

F924 00 

F925 SO 

F926 10 

F92? 31 

F928 20 



SEQ SOURCE STATEMENT 

STA IOBYT 
RET 

HASTER I/O DEVICE TABLE 
4 BYTES/ENTRY 



134 

135 

138 

137 

138 

139 

140 

141 

142 

143 

144 LTBLi 

145 

146 
147 



; RETURN IT TO MEMORY 

; RETURN CONTROL TO MAIN COMMAND LDOP 



BYTE ' IDENTIFYING CHARACTER 

BYTE 1 • LOGICAL DEVICE MASK 

BYTES 2.3 « ADDRESS OF SUBORDINATE PHYSICAL DEVICE TABLE 



DB 

DM 
DB 

DU 
DB 

DV 
DB 

DU 



'C'.CNSK 

ACT 
•R'.RMSK 

ART 

' P'.PHSK 

APT 
'L'.LHSK 

ALT 



148 
149 

150 
151 

132 

153 ; 

134 i I/O SYSTEM PHYSICAL DEVICE TABLES 

153 ; 2 BYTES/ENTRY 

156 ) 

157 ; BYTE * IDENTIFYING CHARACTER 

158 J BYTE 1 * DEVICE SELECT BIT PATTERN 

159 i 



1160 


ACT: 




1161 




DB 


1162 




DB 


1163 




DB 


1164 




DB 


1165 


ART! 




1166 




DB 


1167 




DB 


1168 




DB 


1169 




DB 


1170 


APTi 




U71 




OB 


1.172 




D8 


1173 




DB 



'T'.CTTY 
' C'.CCRT 
' B'.BATCH 
'l*. CUBE 

'T'.RTTY 
'P'.RPTR 
' l'.RUSEl 
'2'.RUSE2 

'T'.PTTY 
'P'.PPTP 
'l'.PUSEl 



) LOCAL CONSOLE < TTY 

1 LOCAL CONSOLE « CRT 

2 BATCH NODE LOCAL CONSOLE • READ. LIST 
i USER DEFINED LOCAL CONSOLE DEVICE 

; READER * TTY 

1 READER * PTR 

; USER DEFINED READER DEVICE 1 

1 USER DEFINED READER DEVICE 2 

; PUNCH ■ TTY 

; PUNCH • PTP 

; USER DEFINED PUNCH DEVICE 1 
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F929 32 

F92A 30 

F92B 34 

F920 00 

F920 43 

F92E 40 

F92F 4C 

F930 80 

F931 31 

F932 CO 
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933 CD39FE 

936 Dl 

93? El 

938 CD6AFE 

93B CD07FE 

93E 0E20 

940 CD14FD 

943 7E 

944 CDOCFE 
947 CD4CFE 
94A DA56F9 
94D 70 

94E E60F 

930 C23EF9 

933 C338F9 

956 CD6AFE 

959 OEOO 

95B CD14FD 

9SE C9 



SEO 




SOURCE 


STATEMENT 


1174 




OB 


' 2',PUSE2 


1175 
1176 


ALT: 


DB 


•T'.LTTY 


1177 




DB 


■C'.LCRT 


1178 




OB 


'L'.LLPT 



1179 

1180 
1181 
1182 
1183 
1184 
1185 
1186 
1187 
1188 
1189 
1190 
1191 
1192 
1193 
1194 
1195 
1196 
1197 
1198 
1199 
1200 
1201 
1202 
1203 
1204 
1205 
1206 
1207 
1208 
1209 
1210 
1211 
1212 
1213 
1214 
1215 
1216 
1217 
1218 
1219 
1220 
1221 
1222 
1223 



DB 



LUSE 



; USER DEFINED PUNCH DEVICE 2 

l LIST » TTY 

I LIST « CRT 

f LIST « LPT 

i USER DEFINED LIST DEVICE 



; 

; 'D' COMMAND - DISPLAY CONTENTS OF MEMORY ON LIST DEVICE 



THIS 
THE 8 

LIST 
PER L 
PRINT 
HULTI 

; BE LE 

DISP! 



ROUTINE EXPECTS T80 HEXADECIMAL PARAMETERS SPECIFYING 

OUHDS OF A MEMORY AREA TO BE DISPLAYED ON THE 

DEVICE. THE MEMORY AREA IS DISPLAYED 16 BYTES 

INE. VITH THE MEMORY ADDRESS OF THE FIRST BYTE 

ED FOR REFERENCE. ALL LINES ARE BLOCKED INTO INTEGRAL 

PLES OF 16 FOR CLARITY. SO THE FIRST AND LAST LINES HAY 

SS THAN 16 BYTES IN ORDER TO SYNCHROHIZE THE DISPLAY. 



DID : 



DM 



CALL 

POP 

POP 

CALL 
CALL 

HVI 

CALL 

HOV 

CALL 

CALL 

JC 

HOV 

ANI 

<IHZ 

JMP 



EXPR 
D 

H 

LCRLF 
DADR 

C, ' ' 

LOH 

A.H 

DBYTE 

HILO 

D12 

A.L 

DFH 

DU 

DIO 



GET TWO ADDRESSES 
GET HIGH ADDRESS 
GET LOU ADDRESS 

PRINT CR.LF 

PRINT MEMORY ADDRESS 



; PRINT SPACE 

; PRINT DATA 

; TEST FOR COMPLETION 

; RETURN TO MAIN LOOP 

; PRINT CR.LF, ADDRESS ON HULTIPLE OF 16 



D12 



CALL LCRLF 

HVI CO 

CALL LOH 
RET 



; WRITE CR.LF 

; WRITE A HULL TO TRIGGER CLOSE 



'E' COMMAND - PUNCH HEXADECIMAL EHD-OF-FILE 

THIS ROUTINE PRODUCES A TERMINATION RECORD WHICH PROPERLY 
COMPLETES A HEXADECIMAL FILE CREATED BY 'V COMMANDS. 
IT EXPECTS ONE HEXADECIMAL PARAMETER, WHICH IT INTERPRETS AS THE 
START ADDRESS TO BE LOADED INTO THE USER'S PROGRAM COUNTER (LOCATED 
IN EXIT TEMPLATE) OH A SUBSEOUEHT ' f CONNAHD; THIS START ADDRESS 
WILL REPLACE THE STORED VALUE OF THE USER'S PROGRAM COUNTER ONLY 
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IOC OBJ 



SER 



SOURCE STATEMENT 



F93F OD 

F9S0 C03»FE 

P963 CDE5FC 

F966 3A 

F967 AF 

F9SB 97 

F969 CDAFFE 

F96C El 

F96D CDAAFE 

F970 3E0I 

F972 CDAFFE 

P975 AF 

F976 92 

F977 CDAFFE 

F97A C309FA 



F97D OC 

F97E CD39FE 

F981 CI 

F982 Dl 

F983 El 

F984 71 

F98S CD4CFE 

F988 D284F9 

F9BB C9 



1224 
1223 
1226 
1227 
1228 
1229 
1230 
1231 
1232 
1233 
1234 
1235 
1236 
1237 
1238 
1239 
1240 
1241 
1242 
1243 
1244 
1245 
1246 
1247 
1248 
1249 
1230 
1251 
1252 
1253 
1254 
1255 
1256 
1257 
1298 
1259 
1260 
1261 
1262 
1263 
1264 
1265 
1266 
1267 
1268 
1269 
1270 
1271 
1272 
1273 
1274 
1275 
1276 
1277 
1278 



i IF THE START ADDRESS IS NONZERO. 

! 

EOF) 



OCR 

CALL 

CALL 

08 

XRA 

NOV 

CALL 

POP 

CALL 

HVI 

CALL 

XRA 

SUB 

CALL 

JNP 



C 

EXPR 

POC 

' ! ' 

A 

D.A 

PBYTE 

H 

PADR 

A»l 

PBYTE 

A 

D 

PBYTE 

HUO 



Ci"l; GET ONE PARAMETER 

PUT <START ADDRESS) ON TOP OF STACK 

OUTPUT RECORD HARK ( ' :' ) 

ZERO CHECKSUM 

D :• 0; A : > 

OUTPUT A RECORD LENGTH OF ZERO 

RETRIEVE START ADDRESS 

OUTPUT IT AS THE LOAD ADDRESS 

RECORD TYPE - 1 

OUTPUT RECORD TYPE 

A :> 

D CONTAINS RUNNING CHECKSUM 

OUTPUT CHECKSUM :• -D 

PUNCH TRAILER AND RETURN 



)«-»-*-*-«-»-»-»-»-»-*-«-«-*-«-*-«-«-*-«-«-»-»-«-«-»-«-»-*-♦-«-*-«. ».* 



> 

1 T 
J F 
J 
J T 
FIL 



COMMAND 



FILL RAM KITH 8-BIT CONSTANT 



HIS ROUTINE EXPECTS THREE HEXADECIMAL PARAMETERS. THE 
IRST AND SECOND (16 BITS) ARE INTERPRETED AS THE BOUNDS 
F A MEMORY AREA TO BE INITIALIZED TO A CONSTANT VALUE. 
HE THIRD PARAMETER (8 BITS) IS THAT VALUE. 
Li 

C ; 

EXPR 



FlOi 



INR 

CALL 

POP 

POP 

POP 

NOV 
CALL 
JHC 
RET 



C:*3; GET 3 PARAMETERS 



D 
N 

H,C 

HILO 

FIO 



I C >• 8-BIT CONSTANT 

1 DE i« HIGH ADDRESS 

HL i> LOH ADDRESS 

STORE CONSTANT IN NEHORY 
TEST FOR COMPLETION 
CONTINUE LOOPING 
I GO BACK TO START 



*C COMMAND - GO TO (ADDRESS). OPTIONALLY SET BREAKPO I HT( S > 

THE C COMMAND IS USED FOR TRANSFERRING CONTROL FROH THE 

MONITOR TO A USER PROGRAM. IT HAS SEVERAL NODES OF 

OPERATION. 

IF ONE HEXADECIMAL PARAMETER IS ENTERED. IT IS INTERPRETED 

AS THE ENTRY POINT OF THE USER PROCRAR AND A TRANSFER TO 

THAT LOCATION IS EXECUTED. 

IF ADDITIONAL (UP TO 2) PARAHETERS ARE ENTERED. THESE ARE 

CONSIDERED 'BREAKPOINTS', I.E., LOCATIONS HHERE 

CONTROL IS TO BE RETURNED TO THE MONITOR MHEH THEY ARE 

ENCOUNTERED IN COURSE OF EXECUTING THE USER PROGRAM. 

IF THE FIRST PARAMETER IS NOT ENTERED, THE STORED VALUE 

OF THE USER'S PROGRAM COUNTER (REGISTER P) IS USED AS 

THE USER PROGRAM ENTRY POINT. 
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IOC OBJ 



F98C 2A0400 
F9BF 2ED2 
F991 E3 



F992 CDC5FE 

F995 CAA4F9 

F998 CD7AFE 

F99B EB 

F99C 2A0400 

F99F 2EE1 

F9A1 72 

F9A2 2B 

F9A3 73 

F9A4 0A01F9 

F9A7 110200 

F9AA CDDEFC 

F9A0 20 

F9AE C074FE 

F9B1 E5 

F9B2 14 

F9B3 0ABAF9 

FJB6 ID 

F9B7 C2AAF9 

F9BA D247F8 

F9BD 2A0400 

F9C0 2EE2 



SEQ 

12/9 ) THIS 

1280 I 1. 

1281 I 

1282 t 

1283 i 2. 

1284 I 

1285 ; 
1284 I 

1287 J 

1288 t 

1289 I 

1290 ; 



SOURCE STATEMENT 



3. 



1291 I 

1292 ; 

s 
» 



1293 
1294 
1295 J 
129* ; 

1297 ; 

1298 CDTOt 
1299 

1300 

1301 

1302 

1303 

1304 

1305 

1306 

1307 

1308 

1309 

1310 

1311 

1312 

1313 

1314 

1315 

1316 BOO i 

1317 

1318 

1319 C01 i 

1320 

1321 

1322 

1323 

1324 

1325 

1326 

1327 

1328 602: 

1329 

1330 

1331 

1332 

1333 (03> 



5. 



COMMAND 
IT FINDS 
MONITOR' 
THAT HAS 
IF THERE 
RET, WE 
A> A OUR 
COUNTER 
HAS ENCO 
IF THERE 
THAT FAR 
IF THERE 
CODE IS 
IF TRAPS 
OH THE H 
THE EXIT 
BY THE B 
HUH A R 
THE EXIT 

LHLP 

HVI 

XTHL 



CALL 

JZ 

CALL 

XCHG 

LHLD 

HVI 

NOV 

OCX 

HOV 

JC 
LXI 

CALL 

OB 

CALL 

PUSH 

INR 

JC 

OCR 

JHZ 

JHC 

LHLD 

HVI 



WORKS IN 

THE EXI 
S STACK. 

PLACED 

IS NO F 
CAUSE EX 
NY ADORE 
FROM WHE 
UMTERED. 

IS A ST 
T OF THE 

18 HO F 
EXECUTED 

(BREAKP 
OHITOR S 

TEMPLAT 
REAKPOIH 
ST INS 

CODE IS 

REHTOP 
L.EXIT 



THE FOLLOWING MANNER) 
T CODE IN TOP OF RAH AND PLACES THIS ADDRESS IM THE 

REPLACING THE RETURH ADDRESS TO ENTRY POINT START 
THERE BY THE HAIH COHNAND LOOP 

URTHER INPUT (I.E. ONLY <CR>> THEN BY EXECUTING A 
ECUTION OF THE EXIT CODE, WHICH COHTAIHS A JUMP TO 
SS (IF IMPROPER USE OF COMMAND). 8) THE PROGRAM 
H THE USER PROGRAM WAS INTERRUPTED OR BREAKPOINT 

ART ADDRESS SPECIFIED, THIS VALUE IS STORED OVER 

EXIT CODE WHICH COHTAIHS THE JNP I HSTRUCT IOH . 
URTHER INPUT, A RET IS EXECUTED AHD THE EXIT 

OIHTS) ARE TO BE SET, THEN THEY ARE READ IH AHD PLACED 
TACK. THEY ARE THEH STORED IH THE PROPER SECTIOH OF 
E. ALSO, IH THE USER'S PROGRAM THE INSTRUCTION SPECIFIED 
T ADDRESS IS SAVED IN THE EXIT TEMPLATE AHD REPLACED 
TRUCTIDH. 
EXECUTED AHD COHTROL IS PASSED TO THE USER PROGRAH. 



AHD OFFH 



PCHK 

GOO 

PAO 

HEHTOP 

L.PLOC 

N,D 

H 

M,E 

G04 

D,2 

COMC 

' . * 

PARAN 

H 

ft 

G02 

E 

C01 

ERROR 

REHTOP 

L.TLOC 



ML HOW POINTS TO EXIT CODE IH TOP OF RAH 

REPLACE THE START RETURH ADDRESS IH THE 

STACK (PUSHED BY HAIH COHHAHD LOOP) WITH 
THIS EXIT CODE ADDRESS SO THAT WHEN THE 
G COHNAND DOES A RETURN, THE EXIT CODE 
WILL BE EXECUTED INSTEAD OF THE MAIN 
COHHAHD LOOP. 

GET A CHARACTER, SET 2, C 

IF ' ', ',', OR <CR>: JUHP, DON'T CHANGE PC 

GET NEW PC VALUE 

OE ■ HEN PC 



AND OFFH ) HL NOW POINTS TO PLOC IH EXIT CODE IH TOP OF RAM 

I STORE MSB OF MODIFIED PC IN EXIT CODE IH RAH 

J STORE LSB OF MODIFIED PC IN EXIT CODE IH RAN 

1 JUMP IF <CR> (NO TRAPS TO BE SET) 

; SET COUHTER(S), D=0, E=2 

; ISSUE A PROMPT FOR A TRAP 

i GET A TRAP 

; STACK IT 

i UP 1 COUNTER 

) TERMINATE IF CR ENTERED 

; DOWN THE OTHER 

i GET ONE HORE TRAP 

> D COHTAIHS HOV MANY TRAPS (1 OR 2) 

; LAST TRAP HOT FOLLOWED BY CR 

AHD OFFH ; HL HOW POIHTS TO TLOC (BECIHNIHG OF TRAP 
; AREA) IH EXIT TEHPLATE IH TOP OF RAM 

i BC CONTAINS THE USER SPECIFIED TRAP ADDRESS 
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LOC OBJ 

F9C2 01 

F9C3 71 

F9C4 23 

F9C5 70 

F9C6 23 

F9C? DA 

F9C8 77 

F9C9 23 

F9CA 3EC7 

F9CC 02 

F9CD 15 

F9CE C2C2F9 

F9D1 CDFEFD 

F904 C9 



F9D5 CD39FE 

F9D8 CDFEFD 

F9D8 91 

F9DC El 

F90D E5 

F9DE 19 

F9DF CD56FE 

F9E2 CD93FC 

F9E5 El 

F9£6 7D 

F9E7 93 

F9E8 6F 

P9E9 7C 

F9EA 9A 

F9EB 67 

F9EC CD56FE 

F9EF C9 



F9F0 OC 

F9F1 C039FE 

F9F4 II 

F9F5 Dl 

F9F6 El 



SEA 

1334 
1335 
1336 
1337 
1338 
1339 
1340 
1341 
1342 
1343 
1344 
1345 
1346 
1347 
1348 
1349 
1350 
1351 
1352 
1353 
1354 
1355 
1356 
1357 
1358 
1359 
1360 
1361 
1362 
1363 
1364 
1365 
1366 
1367 
1368 
1369 
1370 
1371 
1372 
1373 
1374 
1375 
1376 
1377 
1378 
1379 
1380 
1381 
1382 
1383 
1384 
1365 
1386 
1387 
1388 



SOURCE STATEMENT 



G04 



POP 


B 


HOV 


H.C 


INX 


H 


HOV 


H.B 


INX 


H 


LDAX 


8 


NOV 


H, A 


INX 


H 


HV1 


A,(RST 0) 


STAX 


B 


OCR 


D 


JNZ 


G03 


CALL 


CRLF 


RET 





; GET A TRAP (BREAKPOINT) ADDRESS 

; STORE LSB OF TRAP ADDRESS INTO TRAP AREA 

; STORE HSB OF TRAP ADDRESS INTO TRAP AREA 

! FETCH OPCODE BYTE 

l PUT IN TRAP AREA 

; REPLACE THE USER'S OPCODE IN USER PROGRAM 
; BITH A RST 

; DO SANE THING AGAIN FOR 2ND BREAKPOINT 



; EXECUTE MONITOR EXIT CODE, RETURNING TO 
; USER CODE 

'H* COMMAND - COMPUTE HEXADECIMAL SUN AND DIFFERENCE 

THIS ROUTINE EXPECTS TWO HEXADECIMAL PARAMETERS. 
IT COMPUTES THE SUM AND DIFFERENCE OF THE TWO VALUES 
AHD DISPLAYS THEN ON THE LOCAL CONSOLE DEVICE AS FOLLOVS: 
<P1+P2> <P1-P2> 
HEXHi 

CALL EXPR 

CALL CRLF 

POP D 

POP H 

PUSH H 

DAD D 

CALL LADR 

CALL BLK 

POP H 

MOV A.L 

SUB E 

HOV L,A 

HOV A.H 

SB8 D 

HOV H,A 

CALL LADR 

RET 
;•-*-*-*-*-•-»-«-«-«-*-«-»-*-»-«-«-*-♦-»-«-«-«-«-«-»-«-,-«-*-».*.«.,-, 



i GET TVO NUMBERS 

; DE CONTAINS P2 

) HL CONTAINS PI 

; HL •.' HL + DE !• PI + P2 

) DISPLAY SUM 

J TYPE A SPACE 

; HL CONTAINS PI ACAIH 

; CONFUTE HL-DE 

; A i* LSB OF PI - LSB OF P2 

; A : « LSB OF (PI - P2) 

; A !•> HSB OF Pt - MSB OF P2 VITH CARRY 

; H i • HSB OF (PI -P2> 

; DISPLAY DIFFERENCE 



) 'H' COMMAND - MOVE A BLOCK OF MEMORY 

THIS ROUTINE EXPECTS THREE HEXADECIMAL PARAMETERS FROH THE 
LOCAL CONSOLE. THE FIRST AHD SECOND PARANETERS ARE THE BOUNDS OF 
THE MEMORY AREA TO BE MOVED, THE THIRD PARAMETER IS THE 
STARTIHG ADDRESS OF THE DESTINATION AREA. 
HOVE: 

INR C ; GET THREE ADDRESSES 

CALL EXPR 

POP B i DESTIHATIOH ADDRESS 

POP D ; SOURCE END ADDRESS 

POP H ; SOURCE START ADDRESS 
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LOC OBJ 



F9F7 7E 

F9FB 02 

F9F9 03 

F9FA CD4CFE 

F9FD D2F7F9 

FftOO C9 



FflOl CD61FF 

FAQ4 FEOE> 

FA06 C247F8 

FA09 063C 

FA08 CDE3FC 

FAOE 00 

FAOF OS 

FA10 C20BFA 

FA13 C9 



FA14 C06IFF 

FA17 FEOD 

FA19 C247F8 

FAIC 0604 

FA1E 2103F9 

FA21 CDFEFD 

FA24 4E 

FA2S CD95FC 

FA28 CDDEFC 

FA2B 3D 

FA2C 23 

FA2D 7E 

FAZE 2F 

FA2F 4F 

FA30 23 

FA31 9E 

FA32 23 



SEfi 

13B9 
1390 
1391 
1392 
1393 
1394 
1395 
1396 
1397 
1398 
1399 
1400 
1401 
1402 
1403 
1404 
1405 
1406 
1407 
1408 
1409 
1410 
141 1 
1412 
1413 
1414 
1415 
1416 
1417 
1418 
1419 
1420 
1421 
1422 
1423 
1424 
1425 
1426 
1427 
1428 
1429 
1430 
1431 
1432 
1433 
1434 
1435 
1436 
1437 
1438 
1439 
1440 
1441 
1442 
1443 



SOURCE STATEMENT 



NVOi 



HOV 
STAX 
INX 
CALL 

JNC 
RET 



A.H 



HILO 
MVO 



GET A DATA BYTE 
STORE AT DESTINATION 
MOVE DESTINATION POINTER 
TEST FOR COMPLETION 



COMMAND 



PUNCH NULL CHARACTERS FOR TAPE LEADER/TRAILER 



; THIS ROUTINE PUNCHES 60 NULL CHARACTERS OH THE DEVICE RSSICHEO 
i AS THE PUNCH. IT IS ENTERED VIA A JUMP TO ENTRY POINT NUO 
J FROM THE 'E' COHHAND AS NELL AS BEING INVOKED BY 
; THE 'N' COMMAND. 
HULL: 



NUO: 
HLEADX: 



CALL 
CPI 

JHZ 

HVI 



TI 
CR 
ERROR 

8, 60 



POC 



B 

HLEADX 



REQUIRE CR 

SET TO PUNCH 60 HULLS 

PUNCH OHE ASCII NULL CHARACTER (*00H> 



DO IT FOR 60 TIMES 



CALL 

DB 

OCR 

JHZ 

RET 
*♦-•-»-•-*-»-»-»-•-*-*-*-»-*-*-*-*-*-*-•-»-»-•-«-•-*-•-•-•-*-*-*-•-•-• 
; 

; 'B' COHHAND - I/O SYSTEM STATUS BUERY 
) 

; THIS COHHAND IS INVOKED BY TYPING THE LETTER 8. THIS 
! COMMAND PRODUCES A LISTING OF LOGICAL I/O DEVICES AHD 
; THEIR CDRRE8P0NDIHG PHYSICAL DEVICE ASS1CHNEHTS. THE 

; DATA DISPLAYED IS EBU1VALEHT TO THE CURREHT VALUE OF IOBYT. 
QUERY: 

i RE0U1RE CR 

; SET UP OUTER LOOP COUNTER. 
I THERE ARE 4 LOGICAL DEVICES. 

; POIHT HL AT LOGICAL DEVICE TABLE. 

0.0: ; OUTER LOOP 

i START A HEN LINE. 

i DISPLAY LOGICAL DEVICE IDENTIFIER. 

I DISPLAY '■' 

; POIHT AT MASK FOR LOGICAL DEVICE. 

! FETCH MASK. 

i INVERT IT 

1 PUT IN C 

; POIHT AT PHYSICAL DEVICE TABLE 

J ADDRESS OF SUBORDINATE 

J TABLE 



CALL 


ri 


CPI 


CR 


JHZ 


ERROR 


HVI 


B.4 


LXI 


H.LTB 


CALL 


CRLF 


HOV 


C.H 


CALL 


CON 


CALL 


COHC 


DB 


■ ■' 


1HX 


H 


HOV 


A.R 


CNA 




HOV 


C,A 


INX 


H 


NOV 


E,H 


INX 


H 
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IOC OBJ 



SEB 



SOURCE STATEMENT 



FA33 56 

FA34 23 

FA33 EB 

FA36 3A0300 

FA39 Al 

FA3A C5 

FA3B 0*04 

FA30 4E 

FA3E 23 

FA3F BE 

FA40 CA48FA 

FA43 23 

FA44 05 

FA45 C23DFA 

FA48 CD95FC 

FA4B EB 

FA4C CI 

FA40 05 

FA4E C221FA 

FAS1 C9 



FA32 OD 

FA33 CD39FE 

FA56 CDFEFD 

FA59 CD38FF 

FA5C FE3A 

FA3E C259FA 

PA61 AF 

FA62 57 

FA63 CDDBFD 



FA66 CA9EFA 
FA69 3F 



1444 
1445 
1446 
1447 
1448 
1449 
1450 
1451 
1452 
1453 
1454 
1455 
1456 
1457 
1458 
1439 
1460 
1461 
1462 
1463 
1464 
1465 
1466 
1467 
1468 
1469 
1470 
1471 
1472 
1473 
1474 
1475 
1476 
1477 
1478 
1*79 
1460 
14B1 
1482 
1483 
1484 
1485 
1486 
1487 
1488 
1489 
1490 
1491 
1492 
1493 
1494 
1493 
1496 
1497 
1498 



Oli 



HOV 

IHX 

XCHG 

LPA 

ANA 

PUSH 

MVI 

HOV 

INK 

CAP 

JZ 

IHX 

OCR 

JNZ 



821 



D,H 
N 

IOBVT 
C 
B 
B, 4 

CD 

H 

N 

82 

H 

B 

at 
con 



J HL <- PHYSICAL DEVICE TABLE 

J PHYSICAL SELECTION 

J SAVE OUTER LOOP COUNTER 

1 SET UP INNER LOOP COUNTER 

; INNER LOOP 

; GET PHYSICAL DEVICE IDENTIFIER 

J TEST FOR E8UALITY 

; POINT AT NEXT ENTRY 

; DECRENEHT INNER LOOP 



CALL 

XCHC 

POP B 

DCR B 

JNZ 80 

RET 



i DISPLAY PHYSICAL DEVICE 
t POINT AT HASTER TABLE 

1 DECRENEHT OUTER LOOP 



; 

) 'ft' COHHAHD - READ HEXADECIMAL FILE 



-•-•-*-*-»-*-•-*-* 



THIS 
READE 
PARAN 
TO BE 

IN TH 
IH AR 
ALL R 
CHECK 
OCCUR 
TERNI 
GIVEN 
THE U 
A TRA 
AD< 



REDO: 



ROUTI 
R DEV 
ETER 

ADDE 
IS HA 
EAS 
ECORD 
SUN I 
S. TH 
HATED 

HHEH 
SER'S 
HSFER 

DCR 

CALL 

CALL 

CALL 

CPI 

JH2 

XRA 

HOV 

CALL 



J2 
HOV 



HE READS 

ICE AND 

IS EXPEC 

D TO THE 

Y. HEXAD 

THER THA 

S READ A 

H THE RE 

E ROOTIH 

WHEN AN 

THE EOF 

STORED 

TO THE 

C 

EXPR 

CRLF 

RIX 

REDO 
A 

D,A 
BYTE 



RED3 
E,A 



A HEXADECIHAL FILE FRON THE ASSIGNED 
LOADS IT IHTO NEHORY. ONE HEXADECIHAL 
TED'. THIS PARAHETER IS A BASE ADDRESS 

NEHORY ADDRESS OF EACH DATA BYTE EHCOUHTERED. 
ECIHAL FILES NAY BE LOADED IHTO NEHORY 
H THAT FOR HHICH THEY UERE ASSEN8LED OR COHPILEO. 
RE CHECKSUNNED AND CONPARED AGAINST THE 
CORD. IF A CHECKSUH ERROR (OR TAPE READ ERROR) 
E TAKES AH ERROR EXIT. NORHAL LOADING IS 

EOF RECORD IS ENCOUNTERED. THE ADDRESS 

RECORD HAS CREATED (VIA THE ' V COHHAHD) REPLACES 
PC VALUE ONLY IF THE ADDRESS HAS HOHZERO. 
PROGRAN HAY THEN BE ACCOHPLISHED BY A 'G<CR>'. 

; GET ONE ADDRESS: C i= 1 
; GET THE HEX BASE ADDRESS 
; OUTPUT A <CR>,<LF> 

J GET AH ASCII CHARACTER FROH THE READER 
; IS IT A START OF RECORD HARK (':')? 
; LOOP UHTIL HE FIND SUCH A RECORD HARK 

i D HILL COHTAIH THE CHECKSUH; INITIALIZE TO 

J READ 2 ASCII CHAR REPRESENTING THE RECORD 

LENGTH AND DECODE THEN INTO 8 BITS BINARY 
; STBRIHG THE RESULT IH A-REG 

; JUHP IF ZERO RECORD LENGTH BECAUSE THIS 
i NEANS IT'S AH EOF RECORD SO WE'RE DONE 

; E :■ RECORD LENGTH 
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IOC OBJ 

FA6A CDDDFD 
FA6D (7 
FA6E CDDBFD 
FB71 6F 
FA72 CDDBFD 
FA75 40 
FA76 E3 
FA77 2100FF 
FA7A 39 



FA7B CDDBFD 



FA7E 77 

FA7F 23 

FA80 ID 

FA8I C27BFA 

FA84 CDOBFD 



FA87 C247F8 
FASA Dl 

FABB E3 



FA8C EB 

FABD 19 

FARE 0600 

FABO 09 

FA91 £8 

FA92 E3 



FA9E CS 



8E0 

1499 

1500 

1501 

1302 

1903 

1304 

1303 

1306 

1907 

13DB 

1509 

1510 

1511 

1312 

1313 

1314 

1513 REOli 

1516 

1317 

1518 

1519 

1320 

1321 

1322 

1523 

1524 

1323 

1526 

1527 

1S2B 

1529 

1530 

1531 

1532 

1533 

1534 

1533 

1336 

1337 

153B 

1539 

1540 

1541 

1342 

1543 

1344 

1543 

1346 

1347 

1348 

1549 

1530 

1351 

1552 RED3 

1553 



SOURCE STATEMENT 



CALL 

NOV 

CALL 

NOV 

CALL 

NOV 

PUSH 

LXI 

DAB 



CALL 



NOV 
INK 
DCR 
JHZ 
CALL 



JHZ 
POP 

XTHL 



XCHC 

DAD 

HVI 

DAD 

XCHG 

XTHL 



BYTE 

H.A 

BYTE 

L.A 

BYTE 

C.E 

H 

H.-236 

SP 



BYTE 



H.A 

H 

E 

RED1 

BYTE 



ERROR 
D 





6,0 

B 



I GET MSB OF LOAD ADDRESS 

) H i« MSB OF LOAD ADDRESS 

1 GET LSB OF LOAD ADDRESS 

; L '» LSB OF LOAD ADDRESS : 

GET RECORD TYPE AND IGNORE IT 
C >• RECORD LENGTH 
STORE LOAD ADDRESS OH THE STACK 
COMPUTE BUFFER POINTER 

HL HOB POINTS TO THAT PART OF THE MONITOR 
STACK ONE PAGE (256 BYTES) BELOU WHERE 
THE SP IS CURREMTLY POIHTIHG 
HE HILL NOB READ DATA FROM THE FILE RECORD 
AND STORE THEN TEMPORARILY IN THE MONITOR'S 
STACK STARTING FROM A LOU HENORY ADDRESS AND 
MOVING TOUARD A HIGHER MEMORY ADDRESS (REVERSE 
OF USUAL PROCEDURE UHERE STACK GROWS DOUH) 





1941 
1342 


RED2: 






i 




1543 








i 


FA93 2B 


1344 




DCX 


H 


* 


FA94 7E 


1543 




NOV 


A.H 


J 


FA95 IB 


1346 




DCX 


D 


; 


FA96 12 


1347 




STAX 


D 


j 


FA97 OD 


1348 




DCR 


C 




FA98 C293FA 


1549 




JHZ 


RED2 




FA9B C359FA 


1550 

1 IK 1 




JHP 


REDO 





; READ DATA; NOTE: 8 BITS OF MEMORY (DATA) 

i IS REPRESENTED AS 2 HEX CHAR AND EACH HEX 

i HEX CHAR IS REPRESENTED AS ONE 8 BIT ASCII CHAR 

J PUT DATA IH HOHITDR BUFFER 

i HOVE *UP' THE STACK 

i DECREMENT RECORD LENGTH COUNT 

i LOOP UNTIL RECORD LEHCTH COUHTER IS 

J READ THE CHECKSUM RECORD FRAME --- PRIOR TO 
CALL TO BYTE. D-REG COHTAIHED SUM OF DATA 
RECORDS. THE CHECKSUM FRAME SHOULD CONTAIN 
THE NEGATIVE OF THIS SUM. BYTE ADDS D AND A 
TOGETHER AND SETS THE ZERO BIT IF D - < -A ) 
CHECKSUM ERROR 
DE « LOAD ADDRESS; STACK EHTRY POINTED TO BY SP 

HOB CONTAINS BASE (BIAS) ADDRESS 
HL « BIAS ADDRESS! CONTENTS OF STACK ENTRY 
POINTED TO BY SP HOB IS ADDRESS OHE ABOVE 
UHERE LAST DATA IS STORED IH NONITDR STACK 
DE > BIAS ADDRESS. HL * LOAD ADDRESS 

; HL ■ BIAS ♦ LA 

; BC « RECORD LEHCTH (RL) 

; HL • BIAS ♦ LA ♦ RL 

; DE ■ BIAS ♦ LA ♦ RL. HL = BIAS 

J HL POIHTS TO ADDRESS 1 GREATER THAN WHERE LAST 

I DATA IS STORED IH MONITOR STACK 



LOAD INTO PROPER AREA IH RAH BUT IH 

REVERSE ORDER 
DECREHEHT STACK BUFFER POINTER 
A !■ DATA 

DECREHEHT MEMORY POIHTER 
PUT DATA IH DESIGNATED ADDRESS 
KEEP DOING THIS UNTIL RECORD LEHGTH 

COUHT IS EXHAUSTED 
DONE WITH ONE RECORD. GO GET AHOTHER 



PUSH 



) EOF RECORD 
; SAVE B.C 



ENTIRE FILE HAS BEEN READ IH 
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IOC OBJ SEQ SOURCE STATEMENT 

FA9F CDDBFD 1554 CALL BYTE ; GET MSB OF LOAD ADDRESS OF EOF RECORD --- 

1933 ; THIS 18 THE <START ADDRESS) SPECIFIED IN 

1536 i THE 'E' COMMAND. IF IT IS ZERO, DO NOT 

, Ai , A , ,3S7 I MODIFY THE USER'S STORED PC IN EXIT TEMPLATE 

FAA2 47 15S8 NOV S.A ) B »■ MSB OF START ADDRESS 

FAA3 CDDBFD 1559 CALL BYTE i BET LSB OF START ADDRESS 

Fftftt *F I5«0 MOV C.A J C i» LSB OF START ADDRESS 

Fft » 7 " 1561 ORA B ; SEE IF START ADDRESS IS 0000 

FAAB CAB3FA 1562 JZ (E04 ) JUMP IF IT IS <DON'T SET HEM PC) 

FAAB 2A0400 1563 LHLD HEMTOP 

FAAE 2EE1 1564 MVI L.PLOC AND OFFH ; HL POINTS TO PLOC IN EXIT CODE IN TOP OF RAM 

MBO 70 1565 NOV R.8 1 STORE MSB OF START ADDRESS 

M91 2B I"* DCX H ! HL POINTS TO PLOC - 1 OF EXIT CODE 

FA82 71 1567 NOV N.C ; STORE LSB BF START ADDRESS 

1568 RED4: ; FINISH PROCESSING EOF RECORD 

FAB3 CI 1569 POP B > RESTORE B.C 

FAB4 CDDBFD 1570 CALL BYTE ; BET RECORD TYPE AND IGNORE IT 

FAB7 CDDBFD 1571 CALL BYTE ; GET CHECKSUM 

FABA C247F8 1572 JHZ ERROR j JUMP IF CHECKSUM ERROR 

FABD El 1573 POP H J CUT BACK STACK POINTER 

FABE C9 1574 RET 

1573 J*-*-*-*-»-»-»-*-«-»-t-*-»-«-*-»-«-*-«-»-»-«-». »-»-». «.,.».,. ».*.«.«.« 

1576 ; 

1577 I 'S' COHHAHD - SUBSTITUTE NENORY 

1578 l 

1579 ; THIS ROUTINE EXPECTS ONE PARAMETER FROM THE LOCAL CONSOLE, FOLLONED 

1580 ( BY A SPACE. THE PARAMETER IS INTERPRETED AS A HENDRY LOCATION 

1581 i AND THE ROUTINE BILL DISPLAY THE CONTENTS OF THAT LOCATION. 

1582 I FOLLOHED BY A DASH (->. TO HODIFY NENORY, TYPE IN THE HEH DATA 
15B3 ; FOLLOHED BY A SPACE OR A CARRIACE RETURN. IF NO HODIFICATION 
15B4 ; OF THE LOCATION IS REQUIRED, TYPE ONLY A SPACE OR CARRIAGE RETURN 
15B5 t IF A SPACE HAS LAST TYPED. THE NEXT MEMORY LOCATION HILL BE DISPLAYED 

1586 t AND NODIFICATIOH OF IT IS ALLOWED. IF A CARRIAGE RETURN HAS ENTERED, 

1587 ; THE COHHAHD IS TERHINATED. 

1588 ; 

1589 SUBS! 
FA8F CD74FE 1590 CALL PARAN ; GET HENDRY ADDRESS 



FftC2 08 I 3 ' 1 RC i ONLY CR ENTERED SO RETURN TO 

1592 SUO: 



MAIN COHHAHD LOOP 



MC3 7E 1593 NOV A,M ; HL HAS REQUESTED MEMORY ADDRESS 

FAC4 CD5BFE 1594 CALL LBYTE ; DISPLAY COMTEHTS OF THAT ADDRESS 

FAC7 CDDEFC 1593 CALL COMC ; OUTPUT PROMPT CHARACTER 

FACA 2D 1596 D8 

FACB CDC3FE 1597 CALL PCHK 

Ffl " D8 1598 RC ; CR ENTERED. RETURN TO COHHAHD NODE 

FACF CAD9FA 1599 JZ SU1 j SPACE ENTERED, SPACE BY 

FA02 EB 1600 XCHG j SAVE NEHORY ADDRESS 

FAD3 CD7AFE 1601 CALL PAO j GET NEW VALUE 

FAD6 EB 1602 XCHG j E • VALUE 

FAD7 73 1603 MOV N.E j STORE NEH VALUE 

F(,l>8 D8 I' 04 RC j CR ENTERED AFTER VALUE. RETURN 
1603 SU1 : 

Ffl& ' " l * 06 IHX H ; HL POINTS TO NEXT MEMORY LOCATIOH 

FADA C3C3FA 1607 JHP SUO 

1608 ;*-*-*-«-*-*-•-*-*-♦-*-«-*-*-»-*-*-•-*-•-«-«-«-»-♦-».»-«.«.*_*.».,.,_, 
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tOC OBJ 



FAOD CD39FE 

FAEO CDFEFD 

FAE3 01 

FAE4 El 

FAE5 COESFC 

FAE8 3A 

FAE9 011000 

FAEC E5 

FAEO 04 

FAEE 00 

FAEF CAF8FA 

FAF2 C04CFE 

FAF3 02EDFA 



*AF8 El 

FAF9 05 

SftFA 1600 

FAFC 78 

FAFD COAFFE 

FBOO COAAFE 

«B03 AF 

?B04 COAFFE 



FBO? 7E 

?B08 COAFFE 

?BOB 23 

=BOC 05 

fBOO C207FB 

F B 10 AF 

FBll 92 

FB12 COAFFE 

c 3 I 5 51 

►Bl* 2B 



f 9 17 COESFC 

FB1A 00 

FBlfi COESFC 

f B IE OA 

FB1F CD4CFE 

FB22 J2E5FA 



SEQ 

1(09 
1(10 
1(11 
1(12 
1(13 
1(14 
1(15 
1616 
1(17 
1(18 
1619 
1(20 
1621 
1(22 
1(23 
1624 
16 25 
1626 
1(27 
162B 
1629 
1(30 
1(31 
1(32 
1633 
1634 
1635 
1636 
1(37 
U3B 
1639 
164 
1641 
1(42 
164 3 
164 4 
164 5 
1(46 
1647 
1(48 
1(49 
1(50 
1(51 
1652 
1(53 
1(54 
1(55 
1656 
1657 
1(58 
1659 
1(60 
1(61 
1662 
1663 



SOURCE STATEMENT 



'«' COMMAND - VRITE HEXADECIMAL FILE 

THIS ROUTINE EXPECTS TVO HEXADECIMAL PARAMETERS VHICH ARE 
INTERPRETED AS THE BOUNDS OF A MEMORY AREA TO BE ENCODED 
INTO HEXADECIMAL FORMAT AHD PUNCHED ON THE ASSIGNED PUNCH 
DEVICE. 



WRITE: 



MROi 



WR1 : 



HR2! 



VR3 



CALL 


EXPR 


CALL 


CRLF 


POP 


D 


POP 


H 


CALL 


POC 


OB 


> ■ t 


LXI 


i, 16 



PUSH 

INR 

OCR 

JZ 

CALL 

JNC 



POP 

PUSH 

MVI 

NOV 

CALL 

CALL 

XRA 

CALL 



HOV 

CALL 

1NX 

OCR 

JN2 

XRA 

SUB 

CALL 

POP 

DCX 



CALL 

OB 

CALL 

OB 

CALL 

JHC 



C 

UR2 
KILO 
UR1 



H 



D, 

A.B 

PBVTE 

PADR 

A 

PBYTE 



A,M 

PBYTE 

H 

B 

VR3 

A 



PBYTE 

D 

N 



POC 

CR 

POC 

LF 

HILO 

HRO 



GET ADDRESS RANGE 
NEB LINE 

DE i« HIGH ADDRESS 
HL ■■' LOU ADDRESS 

EMIT RECORD HARK 

INITIALIZE B I' 0, 

SAVE HL 

INCREMENT RECORD LENGTH 



TERMINATE ON COUNT OF 16 BYTES 
OR EHD OF RANGE 
HHICHEVER OCCURS FIRST 

OUTPUT A DATA RECORD 
RESTORE HL :• LOU ADDRESS 
SAVE HIGH ADDRESS 
INITIALIZE CHECKSUM D i = 
A :* RECORD LENGTH 
EMIT RECORD LENGTH 
EMIT HL !■ LOU ADDRESS 

EMIT RECORD TYPE > 1 



= AH ( DECIMAL 16) 



J FETCH DATA 

) EMIT IT 

; INCREMENT MEMORY ADDRESS 

; DECREMENT COUNT 

S LOOP UNTIL ENTIRE RECORD HAS BEEN OUTPUT 

; D CONTAINS RUNNING CHECKSUM 

J EMIT CHECKSUM :» -D 

; RESTORE DE :- HIGH ADDRESS 

i BACKUP HENDRY POINTER 

; NOV PUNCH CR.LF IGNORED BY THE 'R' 

i CDNHANO BUT HANDY IF LISTING PUNCHED 

; TAPE OH THE TTY 

i PUHCH CARRIAGE RETURN 

I PUNCH LINE FEED CHARACTER 

; TEST FOR TERMINATION 

i IF NOT DONE, FORM NEXT RECORD AND OUTPUT IT 
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IOC OBJ 
FB25 C9 



FB26 21 81 FB 

FB29 CDC3FE 

FB2C DA&flFB 

FB2F OEOC 

FB31 BE 

FB32 CA3FFB 

«B35 23 

FB36 23 

F837 23 

FB3B OD 

FB39 C231FB 

FB3C C347FB 

FB3F CD93FC 



FB42 
FB45 
f 848 
FB49 
F84C 
FB4D 
FB30 
F851 
FB52 
FB55 
F856 
FB57 
FBSB 
FB39 
FB3C 
FB5D 
FB3E 



CD25FE 

CDDEFC 

2D 

CDC5FE 

08 

CAtOFB 

ES 

cs 

CD7AFE 

?D 

12 

Fl 

87 

FA3FFB 

13 

7C 

12 



FB3F El 

FB60 AF 

FB61 B6 

FB62 FB 

F663 78 

FB64 FEOD 

FB66 C8 

FBS? C342FB 



SEO 

1664 
It 63 
1666 
1667 
1668 
1669 
H70 
1671 
1472 
1673 
1674 
1675 
1676 
1677 
1478 
1679 
1480 
1681 
1682 
1683 
1684 
1(85 
1686 
1687 
1(88 
14B9 
1690 
1691 
1(92 
1(93 
1(94 
1(95 
1(96 
1(97 
1(98 
1(99 
1700 
1701 
1702 
1703 
1704 
1703 
1706 
1707 
1708 
1709 
1710 
1711 
1712 
1713 
1714 
1713 
1716 
1717 
1718 



SOURCE STATEMENT 
RET 

'X' COMMAND - EXAMINE AMD MODIFY CPU REGISTERS 

THIS ROUTINE ALLOHS THE OPERATOR TO EXAMINE AMD/OR MODIFY 
THE CONTENTS OF THE USER PROGRAM'S REGISTERS. THE REGISTER 
VALUES HERE STORED AS A RESULT OF A PREVIOUS BREAKPOINT AMD 
WILL BE RESTORED TO THE USER PROGRAM DURING A SUBSEOUEMT 'G' 

COMMAND. 



XO: 



XI : 
X2l 



X3> 
X4t 



LXI 
CALL 
JC 
HVI 

CMP 

JZ 

IHX 

IHX 

INX 

DCR 

JHZ 

JMP 

CALL 

CALL 

CALL 

DB 

CALL 

RC 

JZ 

PUSH 

PUSH 

CALL 

NOV 

STAX 

POP 

ORA 

JH 

IHX 

NOV 

STAX 

POP 

XRA 

ORA 

RH 

MOV 

CPI 

RZ 

JMP 



H, ACTBL 
PCHK 
X5 
C.HREGS 

N 

XI 

H 

H 

H 

C 

XO 

ERROR 

BLK 

DREG 

COHC 

PCHK 

X4 

H 

B 

PAO 

A.L 

6 

PSM 

A 

X3 

» 

A.H 

D 



A 
H 

A.B 

CR 

X2 



1 POINT TO ACCESS TABLE 
i GET REGISTER IDENTIFIER 
i IF CARRY * 1. CR EHTERED 



1 HATCHED REGISTER IDENTIFIER 
; POINT TO NEXT TABLE ENTRY 



DECREMENT REGISTER COUNTER 

TRY AGAIN 

NOT IH TABLE. ERROR 



) DISPLAY THE REGISTER 

l TYPE PROMPT 

J SKIP IF HULL ENTRY 

i CR ENTERED. RETURN TO COMMAND NODE 

l SAVE POINTER TO ACTBL 

i SAVE PRECISION 

; GET KEN REG VALUE 

; STORE LSB IN REGISTER AREA 

> RETRIEVE PRECISION <A> 

! SET SIGH 

; 8 BITS ONLY 



)• STORE MSB IN REGISTER AREA 
J RETRIEVE ACTBL POINTER 



END OF TABLE. RETURN TO COMMAND RODE 
TEST DELIMITER 

CR EHTERED. RETURN TO COMMAND MODE 



tSIS-I 

INTEL 
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IOC OBJ 



FB6A CDFEFD 



*B6D 
*B?0 
*B71 

fB?2 
tg?j 

f8?4 
*8?7 
fB7A 
f B7B 
FB?E 



CD93FC 

AF 

B6 

PS 

4E 

CD»SFC 

CDDEFC 

3D 

C025FE 

C36DFB 



P931 


41 


FB32 


CF 


S B83 


90 


«934 


42 


f B35 


CB 


FBS6 


30 


FBI? 


43 


FB88 


Cft 


F889 


30 


«B3H 


44 


f BOB 


C9 


SB8C 


00 


F9JD 


45 


*B9E 


C8 


FB8F 


00 


* B50 


46 


•9 91 


:e 


*B92 


00 


fB*3 


48 


FB94 


>t» 


FBJ5 


30 


'9*6 


49 


f B9? 


CD 


'B'JS 


30 


?B*9 


4C 


«B*A 


!>C 


? 8 ? 8 


30 


FB9C 


4D 


«B?0 


JD 


S 69E 


31 


F9 9F 


50 


FBAO 


El 


FBA1 


01 


f BA2 


S3 



SEQ 

1719 XS I 

1720 

1721 X»i 

1722 

1723 

1724 

1725 

1726 

1727 

1728 

1729 

1730 

1731 

1732 J 

1733 ) T 

1734 ; T 

1735 ; 

1736 ; 

1737 ; 

1738 J 

1739 ACT 
1740 



1741 
1742 
1743 
1744 
1745 
1746 



SOURCE STATEMENT 



CALL 

CALL 

XRA 

ORA 

RH 

NOV 

CALL 

CALL 

DB 

CALL 

JHP 



CRLF 

BLK 
A 

n 

CM 

CON 

CONC 

' ■' 

DREG 

Xi 



I DISPLAY ALL THE REGISTER VALUES 



J OUTPUT A SPACE 

J CLEAR A 

; SET CONDITION CODES 

; ALL DONE, RETURN TO COHHAND NODE 

i C CONTAINS A REGISTER IDENTIFIER <A,B,C,D. 

i PRINT CHARACTER 

; PRINT EQUAL SIGH 

i DISPLAY REGISTER CONTENTS 

l CONTINUE 



ASLE FOR ACCESSING REGISTERS 

ABLE CONTAINS! 

( 1 > REGISTER IDENTIFIER 

<2> LOCATION ON STORAGE PAGE 

(3> PRECISION 



BL! 



1747 



1748 



1749 



1750 



1751 



DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 



ALOC AND HNSK. 



'8', BLOC AND HNSK, 



'C, CLOC AND HNSK, 



DLOC AND HNSK, 



E'. ELDC AND HNSK, 



F', FLOC AND HNSK, 



HLOC AND HNSK, 



' I ' , ILOC AND HNSK, 



LLOC AND HNSK, 



'N'. HLOC AND HNSK, 1 



•?>, F-LDC AHt HHSK, 1 



S', SLOC AND HNSK, 1 
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IOC OBJ 

FBA3 91 

FBA4 01 

FBA5 FF 
OOOC 



FBA6 CD61FF 

FBA9 FE24 

FBAB C247F8 

FBAE CD61FF 

FBB1 FEOD 

FBB3 C247F8 

FBB6 3E0C 

FBB8 D3FF 

FBBA CDOOEB 

FB8D C9 



FBBE 3A0300 
FBC1 E603 
FBC3 C2D0FB 



FBC6 0BF5 

FBC8 E602 

FBCA CAC6FB 

FBCD DBF4 

FBCF C9 



FBDO FE01 
!=B!>Z C2FDFB 
?BD5 E5 



SEB 



1732 

1753 

1754 

1755 

1758 

1757 

1758 

1759 

1760 

1761 

1762 

1763 

1764 

1765 

1766 

1767 

1768 

1769 

1770 

1771 

1772 

1773 

1774 

1775 

1776 

1777 

177B 

1779 

17 8 

1781 

17B2 

1783 

1784 

1785 

1786 

1787 

1788 

1789 

1790 

1791 

1792 

1793 

1794 

1795 

1796 

1797 

1798 

1799 

1800 

1801 

1B02 

1803 

1804 



SOURCE STATEHEHT 



DB -1 

HREGS EflU <*-ACT»L>/J J LENGTH OF ACCESS TABLE 

.*.*.*-♦_«-»-«-«-«.«.«-»-«-«-•-*-«-♦-*-*-*-•-*-*-*-•-•-•-•-*-*-♦-•-•-»-«-•-•-*-* 

; 

; •Z' COHMAHD - TRANSFER CONTROL TO DIAGNOSTIC PROGtAN IN PROM 

; THIS ROUTINE EXPECTS A '»' AT HHICH POINT IT WILL CALL THE DIAGNOSTIC PROGRAM. 

Z: 

; GET A CHARACTER FROH THE CONSOLE 

i IS IT A '»*? 

i ERROR IF IT ISH'T 

; GET A CHARACTER FROH THE CONSOLE 

i EXPECT ft CARRIAGE RETURN 

J ERROR IF IT ISN'T 

; TURN OH THE BDDT/DI AGHOST I C PROH 

i CALL THE DIAGNOSTIC PROGRAM 
i RETURN TO MAIN COWHAND LOOP 
******************************************************************************** 

* * 

* END OF HOHITOR COHHAHDS, BEGIHHIHG OF I/O ROUTINES • 

* • 
«**««***««««**»»**««*»»**♦*«*«***«**»*•«**•***•*«»***•••*»*•**«*«*********•*»*»• 

j2.:jJJJJ.JJ. : .'»JiJ,'iJ».:>?JJ,'»»»JJJJJiiJJJ»»JJJ»Ji!i»JJJ2»JJ'J3i'!JJ*JJ* J '''''.' J 

'CI' - EXTERNALLY REFERENCED ROUTINE J 

EHTERED VIA CALL FROH 'TI' ROUTINE 1 

PROCESS: LOCAL CONSOLE INPUT CODE > 

INPUT: i 

OUTPUT: CHARACTER RETURHED IH ft-REG * 

MODIFIED: A, FLAGS ' 

STACK USAGE: 2 BYTES '• 

EXPLANATION: BASED OH I/O STATUS BYTE <IOBYT>, DECIDE IF CONSOLE INPUT ; 

DEVICE IS TTY, CRT. BATCH, OR USER-DEF IHED DEVICE. IF IT IS TTY OR CRT I 

LOOP UNTIL READ, INPUT THE CHARACTER. THEN RETURH. IF IT IS BATCH, ; 

JUHP TO 'Rl' ROUTINE. IF IT IS USER-DEFINED DEVICE, JUHP TO BUSER. I 

iilillZltiilitltliiiiZltlliltlltllititlliiltlll*^ 



CALL 


Tl 


CPI 


'■** 


JHZ 


ERROR 


CALL 


Tl 


CPI 


CR 


JHZ 


ERROR 


HVI 


A.BTDGOH 


OUT 


CPUC 


CALL 


DIAGNN 


RET 





CI : 



LDA 
ANI 
JHZ 



IOBYT 
HOT CHSK 
CIO 



LOCAL COHSOLE IHPUT 

GET STATUS BYTE 

LOOK AT OHLY COHSOLE FIELD 

JUMP IF COHSOLE IS HOT TTY 



i COHSOLE * TTY 
TTY1H: 

IN TTYS 

ANI RRDY 

JZ TTYIH 

IN TTYI 

RET 

; 

.: CONSOLE « CRT, BATCH, OR USER-DEFINED 
CIO: 

CPI CCRT J LOCAL CONSOLE = CRT? 

JNZ CI4 i JUHP IF CONSOLE IS NOT CRT 

PUSH H i SAVE HL 



TTY STATUS PORT 

CHECK FDR RECEIVE BUFFER READY 

LOOP UNTIL IT IS READY 

INPUT CHARACTER FROM TTY 

RETURN! CHARACTER IH A-REG 
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IOC OBJ 



SEQ 



SOURCE STATEMENT 



F906 2A0400 

F8D9 2ECC 

FBDB 7E 

FBDC El 

FBDD OF 



«eOE D2EBFB 



FBE1 DBF7 

FBE3 E602 

FBE5 CAE1FB 

?B£8 DBF* 

?BEA C9 



FBEB 05 

FBEC 0613 

FBEE CD7FFF 

fBFl E601 

FBF3 CAECFB 

FBF6 3612 

FBF8 CD7FFF 

FBFB CI 

FBFC C> 



FBFD FE02 

FBFF CAOFFC 

FC02 3EE8 

FC04 C3BCFC 



FC07 CD44FD 

FCOA B7 

FCOB CB 

FCOC C361FF 



1805 
1806 
1807 
1808 
1809 
1810 
1811 
1812 
1813 
1814 
1815 
1816 
1817 
1818 
1819 
1820 
1821 
1822 
1823 
1824 
1825 
1826 
1827 
1828 
1829 
18 30 
1831 
1832 
1833 
1834 
1835 
1836 
1837 
1B38 
1839 
184 
1841 
1842 
1843 
18 44 
1845 
1844 
1847 
1848 
1849 
18S0 
1851 
1B52 
1853 
1854 
1855 
1856 
1857 
1858 
1859 



LHLD 
MVI 

MOV 
POP 
RRC 



JHC 



MEHTOP 

I, ILOC-1 AND OFFHi 

A.N 
H 



CI2 



HL NOW POINTS TO CONFIGURATION BYTE STORED 
IN EXIT TEMPLATE IN TOP PAGE OF RAH 

A :* CONFIGURATION BYTE 

RESTORE HL 

ROTATE BIT IHTO CARRY BIT. THUS CARRY 
NEANS RUNNING ON SYSTEM WITHOUT INTE 
CRT 

JUMP IF INTEGRATED CRT IS PRESENT 



* 1 
GRATED 



: CONSOLE 
Cti : 



« SERIAL CRT 



IN 

ANI 

JZ 

IN 

RET 



uses 

RRDY 
CI 1 
USCI 



i CONSOLE ' INTEGRATED CRT 



CI2: 
CI 3 : 



PUSH 

nvi 

CALL 

AMI 

JZ 

NVI 

CALL 

POP 

RET 



6.KSTS 

I0CDR1 

KRDY 

CI3 

B.KEYC 

I0CDR1 



INPUT CRT STATUS 

CHECK FOR RECEIVER BUFFER READY 

LOOP UNTIL IT IS READY 

GET CHARACTER FROM THE CRT 

RETURN; CHARACTER IS IN A-REG 



SAVE B.C 

LOAD KEYBOARD STATUS COMMAND 

INPUT KEYBOARD STATUS FROM IDC 

IS THE KEYBOARD READY? 

LOOP UNTIL IT IS 

LOAD INPUT DATA COHBAHD 

INPUT DATA FROM THE KEYBOARD 

RESTORE B.C 

RETURN; CHARACTER IS IN A-REG 



: CONSOLE IS BATCH OR USER-DEFINED DEVICE 
CI 4 : 



CPI BATCH 

JZ RI 

MVI A.CILOC AND HHSKi 

JHP IUSER 



BATCH MODE. INPUT = READER 
USER DEFINE LOCAL CONSOLE INPUT 



i 'BREAK' - ENTERED VIA CALLS FROM ' BLK' , ' COM ' , ' LOH ' ROUTINES 

; PROCESS! TEST FOR OPERATOR INTERRUPTION OF COMMAND (I.E. DID OPERATOR 

; DEPRESS THE 'BREAK" KEY) 

; INPUT: 

; OUTPUT! 

; MODIFIED! A. FLAGS 

< STACK USAGE: 4 BYTES 

BREAK: 

CALL CSTS i SEE IF A KEY HAS DEPRESSED 

ORA A 



;;;;;; 



NO CHARACTER READY 
GET THE CHARACTER 

m ) ) m / ) m ; ) / i ' .' ' i i m i m > .' i ; j 



RZ 

JHP TI 

iiiiitliiliiiitilittiiifiiiiiii 

> 'RI' - EXTERHALLY REFERENCED ROUTINE 

; EHTERED VIA CALLS FROM 'CI'.'RIX' ROUTINES 

) PROCESS: READER INPUT CODE 

; INPUT: 



t i I » t I 
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LOC OBJ 



SEG 



SOURCE STATEMENT 



FCOF E5 

FC 10 3A0300 

PC13 E60C 

FC15 C258FC 



FC1B C5 

FC19 3E0D 

FC1B D3FF 

PC1D D8F4 



FC1F DBF5 

FC21 E604 

FC23 CA1FFC 

FC26 3E27 

E C28 D3F5 

FC2A 0628 

FC2C COIEFE 

-*C-.2F 05 

FC30 C22CFC 

FC33 3E25 

FC35 D3F5 

FC3? 06FA 

FC39 D8F5 

FC38 E602 

FC3i> C24CFC 

FC40 CDIEFE 

FC43 05 

FC44 C239FC 

FC47 AF 
FC48 37 
FC49 C34FFC 

FC4C 0BF4 
FC4E 87 

FC4F F5 

FC50 3E05 

FC52 D3FF 

FC54 Fl 

FC55 CI 

FC5S El 

FC3? C9 



1860 
1861 
1862 
1863 
18 64 
18 6 5 
1866 
186? 
1868 
1869 
1870 
1871 
1872 
1873 
1874 
1875 
1876 
1677 
1B78 
1879 
1880 
1881 
1BB2 
1883 
18B4 
18B5 
1886 
1BB7 
18B8 
18B9 
1890 
1891 
1892 
1893 
1894 
1895 
1896 
1897 
1898 
1899 
1900 
1901 
1902 
1903 
1904 
1905 
1906 
1907 
1908 
1909 
1910 
1)11 
1912 
1913 
1914 



i OUTPUT.' CARRY = AND VALID CH 
i CARRY - 1 AND INVALID 

; MODIFIED: A, FLAGS 

; STACK USAGE: 8 BYTES 



ARACTER IN A-REG,. OTHERWISE 
DATA (ZEROES) IN A-REG 



■ / t J t » 



RI 



PUSH 
LDA 
ANI 
JN2 



' l $ 1 1 1 > i 1 1 

H 

IOBYT 
NOT RHSK 
RI5 



RIO: 



RI I i 



R12 



RI 3 : 

RI 4 : 

R I 4 B : 



IN 

ANI 

JZ 

HVI 

OUT 

NVI 

CALL 

OCR 

JN2 

NVI 

OUT 

HVI 

IN 

ANI 

JHZ 

CALL 

DCR 

JHZ 

XRA 
STC 
JHP 

IN 
ORA 

POSH 

BVI 

OUT 

POP 

POP 

POP 

RET 



TTYS 

TXBE 

RIO 

A.TADV 

TTYC 

B.RADCT 

DELA V 

B 

til 

A.COHD 

TTYC 

B.RTOCT 

TTYS 

RRDY 

R14 

DELAY 

B 

RI2 

A 

RI48 

TTY1 



PSD 

A.EHABL 
CPUC 
PSH 



titttfftflifftiitttiiSttifiiiiil 

i READER INPUT 

; SAVE ML 

J GET STATUS BYTE 

; GET READER BITS 

; JUMP IF READER IS NOT THE TTY 



) i J ; j i 1 1 1 i ; ) j ; j 



l READER » TTY 

PUSH B 

HVI A.D1SABL 

OUT CPUC 

IN TTYI 



1 SAVE BC 

; HOLD UP INTERRUPTS WHILE TAPE IS ADVANCING 

; CLEAR RECEIVE BUFFER BY. READING IN ANY 
J DATA THAT HAY BE THERE 

i READ IN USART STATUS 

i CHECK FOR TRANSMITTER BUFFER EMPTY 

; TRY AGAIN IF NOT EHPTY 

i ADVANCE THE TAPE 

J OUTPUT THE ADVANCE COMMAND 

; INITIALIZE TIMER FOR 45 MS. 

J DELAY FOR 1 MILLISECONDS 

) DECREMENT TIMER 

; JUMP IF TINER NOT EXPIRED 

; STOP THE READER ADVANCE 

; OUTPUT STOP COMMAND 

; INITIALIZE TIMER FOR 250 MS. 

; INPUT READER STATUS 

J CHECK FOR RECEIVER BUFFER READY 

i YES - DATA IS READY 

1 DELAY 1 MS 

; DECREMENT TIMER 

i JUMP IF TINER NOT EXPIRED 

; ZERO A, RESET CARRY 

; SET CARRY INDICATING EOF 



CLEAR CARRY 

SAVE DATA 

PERMIT INTERRUPTS TO GO THROUGH 



READER IS PTR. USER-DEV-I, OR 



1 RESTORE BC 
J RETURN 
USER-DEV-2 
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IOC OBJ SEQ SOURCE STATEMENT 

1919 RI 5 i 

FC5B FE04 1816 CPI RPTR J IS READER THE PAPER TAPE READER? 

FC5A C2B2FC 1817 JNZ RIB ! JUMP IF IT ISN'T 

1818 ! 

1*18 J READER « PAPER TAPE READER 
FC5D C5 1820 PUSH B I SAVE BC 

fCSE 0650 1821 HVI B.RDRC OR PTRADV; LOAD READER ADVANCE 1 FRAHE COHNAHD 

FC60 CDE4FF 1822 CALL PIOCOH ; OUTPUT THE CDNKAND 

FC63 26FA 1823 HVI H.TDUT i 250 HS . TINEOUT COUNTER 

1824 RI 6 t 
FC65 0(11 1825 HVI B.RSTC J LOAD READER STATUS COHNAHD 

FC(7 CDB5FF 1826 CALL PI0DR1 i READ STATUS 

FC6A E601 1827 AHI PTRDV 1 IS THE READER READY? 

FC6C C278FC 1828 JH2 RI7 I JUHP IF IT IS 

FC6F CD1EFE 1828 CALL DELAY i STALL FOR 1 HS. 

FC72 23 1830 OCR H I 230 HS. TINEOUT LOOP 

FC73 C265FC 1831 JH2 RI6 

FC76 C347FC 1832 JHP RI3 ) 250 HS. ARE UP; RETURH HITH CARRY = 1 (EOF COHD) 

1933 RI7: i THE PAPER TAPE READER IS READY 

FC78 3(10 1934 HVI B.RDRC i LOAD READER COHNAHD 

FC7B CDB5FF 1935 CALL PI0DR1 .' READ A CHARACTER FROH THE PAPER TAPE READER 

FC7E 87 1936 ORA A i RESET CARRY BIT 

FC7F CI 1937 POP B I RESTORE BC 

FC80 Et 1938 POP H 

FC81 C9 1939 RET J RETURN SUCCESSFULLY KITH CARRY > 

1940 J 

1941 I READER IS USER-DEFIHED DEVICE 1 OR DEVICE 2 
1842 RI8: 

*C32 El 1843 POP H 

FC83 FE08 1844 CPI RUSE1 

FC8S 3EEE 1945 HVI A.R1LDC AND HHSK 

FC97 CA8CFC 1946 JZ IUSER J READER « USER-DEFIHED DEVICE 1 

FC3A 3EF1 1947 HVI A.R2L0C AND HHSK 

1948 ;*«****JHP BU8ER 1 READER « USER-DEFIHED DEVICE 2 

1949 !iii;iiiiMiiiiiiiiii:tiiiit;iiiiiiMi:iiinii!Hiiii!iiiMif;iitJi;:nniiJiui 

1950 i 'OUSER' • ENTERED VIA JUHPS FROH ' LO ' . ' LOH' . ' RI ' . ' C I ' . ' BLK ' , ' CON' . 

1951 ; 'CO'. 'POC . 'PO' . 'CSTS* ROUTINES 

1952 ; ENTERED VIA FALL-THRU FROH 'RI' ROUTINE 

1953 I PROCESS! USER-DEFINED I/O ENTRY POINT TRANSFER LOCIC 

1954 ! INPUT: A-REG COHTAIHS LSB ADDRESS PTR INTO USER-DEFINED ENTRY POINT TABLE (XT8L) 

1955 ) OUTPUT: 

1956 ; MODIFIED) 

1957 I STACK USAGE) 

1958 IUSER: 

FC8C E5 1959 PUSH N i 8AVE HL, CREATE A STACK EHTRY 

FC8» 2A0400 1960 LHLD HEHTOP 

FC90 6F 1961 NOV L.A I NL NOV POINTS TO PROPER USER EHTRY POIHT IN 

1962 1 XT8L IN EXIT TEHPLATE IH TOP PACE OF RAH 

FC91 E3 1963 XTHL t RESTORE HL; SP HON POINTS TO USER EHTRY POIHT 

FC92 C9 1964 RET ; BEGIN EXECUTING AT THIS ENTRY POINT 

1965 ; i ; ; » ;;;;;;; i ; ; ;;;;;;;;;;; s ;;;;;;;;;;; ; ; ; ;;;;;;;;;;;;;;;;;;;;;;;;; i ;;;;;;;;;;;; ; 

19(6 ; 'CO' • EXTERNALLY REFERENCED ROUTINE J 

1967 ; ENTERED VIA CALL FROH 'TI' ROUTINE ; 

19(8 ; 'BLK' - ENTERED VIA CALLS FROH 'H'. 'X' COHNAKDS ; 

19(9 ; 'CON' - EHTERED VIA CALLS FRON '0'. 'X' COHHAHDS J 
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IOC OBJ 



SE8 



SOURCE STATEMENT 



FC93 0E20 

FC95 3A0300 

FC98 E6Q3 

F09A FE02 

FC9C C4D7FC 



FC9F 3A0300 
FCA2 E603 
FCA4 G2B2FC 



FCAT DBFS 

FCB9 £601 

FCAB CAA7FC 

FCAE 79 

FCAF 93F4 

FCB1 C9 



FCB2 FE02 

FCB4 CA1EFD 

FCB? FEOl 

FCB9 3EEB 

FCBB C28CFC 



FCBE E5 

FCBF 2A0400 

FCC2 2ECC 

FCC4 ?E 

FCC5 El 

FCC6 OF 

FCC? 92DSFC 



FCCA DBF? 



1970 
1971 
1972 
1973 
1974 
1975 
1976 
19 77 
1978 
1979 
1980 
1981 
1982 
1983 
1984 
198S 
1986 
1987 
1983 
1989 
1990 
1991 
1992 
1993 
1994 
1993 
1996 
1997 
199B 
1999 
2000 
2001 
2002 
2003 
2004 
200S 
2006 
2007 
2008 
2009 
2010 
2011 
2012 
2013 
2014 
2015 
2016 
2017 
2018 
2019 
2020 
2021 
2022 
2023 
2024 



• TTYO 
' CRTO 

PROCE 
INPUT 
OUTPU 
NODIF 

STACK 



ENTERED VIA JUMPS FROM 'COHC. 'HXO' ROUTINES 
UT' - ENTERED VIA JUMPS FROM ' LOM • , ' LO ' . ' POC - ' PO' 
UT' - ENTERED VIA JUMPS FROM 'LOH'.'LO' ROUTINES 

ENTERED VIA CALL FROM BOOTSTRAP PROGRAM 
SS: LOCAL CONSOLE OUTPUT CODE 
i VALUE IN C-REG 
Ti DATA OUTPUT TO APPROPRIATE DEVICE 



ROUTINES 



IEDi A. 
USAGE: 



FLAGS. C 
2 BYTES 



t t # » t I 



ttrirtttttttttttiti t t t t t 



t f f t t t I f t t f i t i f i t t i t f r .' r t ( 



ttttttit 



BLK' 
COM: 



CO! 



PRINT A BLANK 



NVI 

LDA 
AN I 
CPI 
CNZ 



LDA 
ANI 
JNZ 



C, ' ' 

IOBYT 
NOT CHSK 
BATCH 
BREAK 



IOBYT 
NOT CI 
COO 



SK 



; COH80 
TTYOUT! 



LE 

IN 

ANI 

JZ 

NOV 

OUT 

RET 



TTY 



TTYS 

TRDY 

TTYOUT 

A.C 

TTYO 



LOCAL CONSOLE OUTPUT 

CET STATUS BYTE 

LOOK ONLY AT CONSOLE FIELD 

IS CONSOLE = BATCH? 

IF SO. DO NOT HONOR BREAK KEY IN BATCH NODE 

IF IT ISH'T, THEN TEST FOR BREAK KEY 

EXTERNAL ENTRY POINT 

GET STATUS BYTE 

LOOK ONLY AT CONSOLE FIELD 

JUMP IF CONSOLE IS NOT TTY 



LOCAL CDHSOLE » TTY; GET TTY STATUS 

IS IT READY? 

LOOP UNTIL IT IS 

LOAD CHARACTER TO BE OUTPUT 

OUTPUT CHARACTER 

RETURN 



; CONSOLE IS CRT. BATCH. OR USER - DEFI NED 
COO: 

CPI BATCH 

JZ LO 

CPI C CRT 

HVI A.COLOC AND OFFH 

JNZ BUSER 



CONSOLE « BATCH? 

JUMP TO LIST OUTPUT IF IT IS 

LOCAL CONSOLE * CRT? 



; CONSOLE ■ 

CRTOUT! 

PUSH 

LHLD 

NVI 

MOV 

POP 

RRC 

JHC 



CRT 



i CONSOLE « 
CRTOTl: 

IN 



H ; 

MEMTOP 

L. UOC-1 AND OFFH 

A.N 

H 



CRT0T2 
SERIAL CRT 

uses 



JUMP IF IT ISN'T. I.E. CONSOLE IS 
USER DEFINED LOCAL CONSOLE OUTPUT 



SAVE H.L 



i HL HON POINTS TO CONFIGURATION BYTE IN EXIT TEMPLATE 
A NOU CONTAINS THIS CONFIGURATION BYTE 
RESTORE H.L 
ROTATE BIT INTO CARRY BIT) THUS CARRY 

* 1 IF INTEGRATED CRT HOT PRESENT 
JUMP IF INTEGRATED CRT 



1HTELLEC WITH SERIALLY CONNECTED CRT 
INPUT CRT STATUS 
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LOC OBJ 



SEB 



SOURCE STATEMENT 



FCCC E60I 

FCCE CACAFC 

KOI 79 

FCD2 D3F6 

FCD4 C9 



FCD5 79 
FCD6 C5 



FCD7 9610 

FCD9 CD94FF 

FCOC CI 

PCOP C9 



FCOE E3 



FCDF 4E 

FCEO 23 

FCE1 E3 

FCE2 C395FC 



FCE9 E3 



FCE6 4E 

FCE7 23 

FCE8 E3 

FCE9 3A0300 

FCEC E630 



2025 
2026 
2027 
2028 
2029 
2030 
2031 
2032 
2033 
2034 
2035 
2036 
2037 
2038 
2039 
2040 
2041 
2042 
2043 
2044 
2045 
20 4 6 
2047 
2048 
2049 
2050 
2051 
2052 
2053 
2054 
2055 
2056 
2057 
2058 
2059 
2060 
2061 
2062 
2063 
2064 
2063 
2066 
2067 
2068 
2069 
2070 
2071 
2072 
2073 
2074 
2075 
2076 
2077 
2078 
2079 



AH I 

JZ 

NOV 

OUT 

RET 



TROV 
CRT0T1 
A.C 
USCO 



; IS IT READY? 

; LOOP UNTIL IT IS 

; HOVE CHARACTER TO BE OUTPUT TO C-REG 

; OUTPUT IT TO THE CRT 



J CONSOLE - IHTEGRATED CR1 
CRT0T2: 

HOV A,C 

PUSH B 



HVI B.CRTC 

CALL I0C0R2 

POP B 
RET 



INTELLEC WITH INTEGRATED CRT 

HOVE CHARACTER TO BE OUTPUT TO A-REG 

SAVE B.C 

CRT IS ALWAYS READY AND PRESENT - NO NEED 

TO CHECK ITS STATUS 

LOAD OUTPUT TO CRT COHNAHD 

OUTPUT DATA TO CRT 

RESTORE B.C 



itiiitli 11 ilifltiiiliiiit 

i 'COMC - ENTERED VIA CA 

; 'START' ,'CRLF' 

i PROCESS: LOCAL COHSDLE 

; INPUT: SP 

I OUTPUT: CONTEHTS OF ADD 

; THAH THAT OF TH 

i MODIFIED! C.H.L 

; STACK USAGE: 2 BYTES 

COHCt 

XTHL 



•tttt>tfl>*ittttlft» 



< * t > > t t t . 



1 1 i it 



LLS FROM 'C* . '0'. 'S* . ' X' COMMANDS AND 'ERROR', 
, 'RESTART' ROUTINES 
OUTPUT OF CONSTANT DATA 

RESS POINTED TO BY SP IS A RETURH ADDRESS TWO GREATER 
E CALL COMC INSTRUCTION 



HOV 


C.N 


IHX 


H 


XTHL 




JMP 


con 



SINCE COMC HAS CALLED. SP NOV POINTS TO A ST 
ENTRY CONTAINING THE ADDRESS OF THE NEXT 
INSTRUCTION. WHICH IN THIS CASE IS A DB. 
HL HOW POINTS TO THIS DB. 
C HOW CONTAINS THE CHARACTER TO BE OUTPUT 
BUMP RETURH ADDRESS. I.E. POINT IT BEYOND THE 
SP MODIFIED. HL IS AS IT WAS ORIGINALLY 
OUTPUT IT 



ACK 



mini 
: 'PO' - 



tttfltttttft 



* t t r r i t 



t * i i t i t t i 



; i 



tttttttttitri 



POC 



EXTERHALLY REFER 
EHTERED VIA CALL 
EHTERED VIA CAL 
I R0UT1HES 

» PROCESS: PUHCH OUTPUT C 
i IHPUT: VALUE IH C-REG 
; OUTPUT: 

I MODIFIED! A, FLAGS. C 
i STACK USACEt 2 BYTES 
llilllllllllfflllllllllll 
POC: 

XTHL 



PO: 



EHCED ROUTINE 

FROH 'PBYTE' ROOTIHE 
LS FROM 'E'.'H'.'W' COMMANDS AMD 'LEAD' 



ODE 



'PEOL' 



I 



Hill 



I . 



....... 



I : 



I I I t I I i I I I I I I i I I i 



HOV 
IHX 
XTHL 


C.H 
H 


LDA 
AHI 


IOBYT 
HOT PHSK 



J PUNCH A COHSTANT 

J SINCE POC EHTERED VIA CALL. SP POIHTS TO STACK 

; ENTRY COHTAIHIHG ADDRESS OF NEXT INSTRUCTION 

J WHICH IS A DB. HL HOW POIHTS TO THIS DB. 

; C HOW COHTAIHS CHARACTER TO BE PUHCHED 

i BUMP RETURH ADDRESS. I.E. POINT IT BEYOHD DB 

; SP MODIFIED. HL IS AS IT WAS ORIGINALLY 

; PUHCH OUTPUT 

i SET STATUS BYTE 

; GET PUHCH BITS 
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IOC OBJ 

FCEE CAA7FC 

FCF1 FE10 

FCF3 C208FD 



FCF6 C5 

FCF? 0613 

FCF9 C0B5FF 

FCFC £601 

FCFE CAF7FC 

FDQ1 0612 

FD03 CDCEFF 

FD06 CI 

FD07 C9 



FD08 FE20 

FDOA 3EF4 

FOOC CA8CFC 

FDOF 3EF7 

FDI1 C38CFC 



FD14 3A0300 

Ft>l? E603 

FD19 FE02 

FHS C407FC 



FP1E 3A0300 

F021 E6C0 

FD23 CAA7FC 

FD26 FE40 

FD28 CABEFC 

FD28 FECO 

FD2D 3EFA 

FD2F CA8CFC 



FD32 C5 
FD33 0615 



SEB 

208 
2081 
2082 
2083 
2084 
2085 
2086 
2087 
2088 
2089 
2090 
2091 
20 92 
2093 
2094 
2095 
2096 
2097 
2098 
2099 
2100 
2101 
2102 
2103 
2104 
210S 
2106 
2107 
2108 
2109 
2110 
2111 
2112 
2113 
2114 
2115 
2116 
2117 
2118 
2119 
2120 
2121 
2122 
2123 
2124 
2125 
2126 
2127 
2128 
2129 
2130 
2131 
2132 
2133 
2134 



SOURCE STATEMENT 

JZ TTYOUT 

CPI PPTP 

JNZ P01 



t P 
POO 



UHCH * PAPER TAPE PUNCH 
PUSH 8 



HVI 

CALL 

AMI 

JZ 

HVI 

CALL 

POP 

RET 



B.PSTC 

PI00R1 

PTPRY 

POO 

B.PUHC 

PI0DR3 

B 



JUHP IF PUNCH ISN'T TTY 

IS PUNCH • PAPER TAPE PUNCH? 

JUHP IF IT ISN'T 



SAVE BC 

PUNCH • PTP 

LOAD PUNCH STATUS CONHAND 

READ STATUS 

IS THE PUNCH READY? 

LOOP UHTIL READY 

LOAD PUNCH OUTPUT COHHAHD 

OUTPUT CHARACTER THAT HAS IN 

RESTORE BC 



C-RE6 



; PUNCH IS USER-DEFINED DEVICE 1 DR DEVICE 2 
P01 : 



CPI PUSE1 

HVI A.P1L0C AHD OFFH 

JZ 8USER ; PUHCH ■ USER DEFINED PUHCH 1 

HVI A/P2L0C AND OFFH 

JHP PUSER i PUHCH » USER DEFIHED PUHCH 2 



; 



i . 



LO* 



J i I 



* * t I * t . 



* 9 » * > » t 



'LOH' 



PRO 
I HP 
OUT 
NOD 
STA 

mi 

LOH: 



CES 
UTi 
POT 
IFI 

CK 
Hi. 



EXTERNALLY REFERENCED ROUTINE 
ENTERED VIA JUHPS FROH 'CON'. 'CO 

• EHTERED VIA CALLS FROH 
ENTERED VIA JUHPS FROH 

Si LIST OUTPUT 
VALUE IN C-REG 

ED: A. FLAGS. C 
USAGE! 2 BYTES 



f t t I i I i f t i t } i } i I 



BLK' ROUTIHES 
D' CONHAND AND ' DB YTE ' . ' LCRLF ' ROUTINE! 
DBYTE* ,'LCRLF' ROUTIHES 



LDA 
AH I 
CPI 
CHZ 



10BYT 
NOT C 
8ATCH 
BREAK 



HSK 



LOi 



LDA 

AHI 

JZ 

CPI 

JZ 

CPI 

HVI 

JZ 



I i I t \ I l i I I I I i I I i i > t I I i I 1 i i I i I I I I i 1 I \ I i I } i I I i t I t t i i t i > i I 

LIST OUTPUT ON CONSOLE 

LOOK ONLY AT CONSOLE FIELD OF I 
IS CONSOLE ASSIGNED TO BATCH HO 
IF IT ISN'T, HE SHOULD TEST FOR 

I.E. IN BATCH RODE THE BREAK 

HONORED 
LIST OUTPUT 
BET STATUS BYTE 
LOOK AT LIST FIELD 
JUHP IF LIST » TTY 



IOBYT 

HOT L 

TTYOU 

LCRT 

CRTOU 

LUSE 

A.L1L 

(USER 



HSK 
T 



tirrttrttt 



OBYT 

DE? 
BREAK 
KEY IS 



i I t 1 I i 



KEY 
HOT 



T i JUHP IF LIST » CRT 

; TEST FOR USER DEFIHED LIST DEVI 

DC AHD OFFH; A i- LSB OF L1L0C ADDRESS 

; JUHP IF LIST < USER-DEFINED DEV 



CE 
ICE 



; LIST • LPT 
PUSH 

LPOl 

HVI 



8.LSTC 



J SAVE BC 

i LOAD LINE PRIHTER STATUS COHHAHD 
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IOC OBJ 



SEQ 



SOURCE STATEMENT 



F039 CDB3FF 

FD3B E601 

FD3A CA33FD 

FD3D 0(14 

F03F CDCEFF 

FD42 CI 

FD43 C9 



F044 3A0300 
FD4? E603 
FD49 C253FD 



FD4C DBFS 
FD4E E602 

FD30 C374FD 



FD33 FE01 

FD35 C279FD 

FD38 E5 

FD59 2A0400 

FP3C 2ECC 

FDSE 7E 

FD3F El 

FD60 OF 

FD61 D26BFD 



FD(4 DBF7 
FD(( E(02 

FD6S C374FD 



FOiB C5 

F0«C 0(13 

FOCE CD7FFF 

FD71 E601 

F073 CI 



2133 
2136 
2137 
2138 
2139 
2140 
2141 
2142 
2143 
2144 
2143 
2146 
2147 
2148 
2149 
2130 
2131 
2132 
2133 
2154 
2133 
2156 
2157 
2138 
2139 
2160 
2161 
2162 
2163 
2164 
2163 
2166 
2167 
21(8 
2169 
2170 
2171 
2172 
2173 
2174 
2173 
2176 
2177 
2178 
2179 
2180 
2181 
2182 
2183 
2184 
2185 
2186 
2187 
2188 
2189 



; j i 



j 

t P 
) I 
J 
J 

i M 
i S 
1 I I 

CST 



II III 
CSTS' 

ROCES 
HPUT: 
UTPUT 

OMFI 

TACK 

iliil 

Si 



CALL 
AHI 
JZ 
MV1 
CALL 
POP 
RET 
i I i I 
- E 
E 
S: L 



PI0DR1 

LPTRV 

LPO 

8.LPTC 

PI0DR3 

8 



READ STATUS 

IS IT READY? 

LOOP UNTIL IT IS 

LOAD LINE PRINTER PRINT COMMAND 

OUTPUT CHARACTER COMTAINED IN C-REC 

RESTORE BC 



milium a n mil i mi at m ii n •> i 
XTERHALLY REFERENCED ROUTINE 
HTERED VIA CALL FROM 'BREAK' ROUTINE 
OCAL CONSOLE INPUT STATUS 



J . 



t ii m it t it m n 



t A-REG CONTAINS 00 IF NO KEY HAS BEEN DEPRESSED. 
A-REG CONTAINS FFH IF A KEY HAS BEEN DEPRESSED 
EDi A. FLAGS 
USAGE! 2 BYTES 



i m n 1 1 i mi m n m ii i m ; i ii H i ii 1 1 1 n > i 



ii ill iiiliiiliiliiili till 



LDA 
AHI 

JHZ 



IDBYT 
NOT CASK 
CSO 



; LOCAL CONSOLE INPUT STATUS 

; GET STATUS BYTE 

; LOOK ONLY AT CONSOLE FIELD OF IOBYT 

I JUMP IF CONSOLE IS HOT TTY 



»-- 

I C 



OHSOLE ■ 
IH 
AHI 

JHP 



TTY 



TTYS 
RRDY 

CS2 



; GET TTY STATUS 

i IS RECEIVE BUFFER READY? (IF TTY KEY HAS 

J DEPRESSED, ZERO BIT HILL BE RESET) 



; CONSOLE - CRT, BATCH. OR USER-DEFINED 
CSO! 



CPI 

JHZ 

PUSH 

LHLD 

MVI 

NOV 

POP 

RRC 

JHC 



CCRT 
CSS 

N 

RENTOP 

L.ILOC 

A.H 

N 



CS1 



; CONSOLE • CRT? 

; JUMP IF CONSOLE IS HOT CRT 

; SAVE H.L 

•1 AND OFFH; HL POINTS TO COHF IGURAT IOH BYTE IH EXIT TEMPLATE 

; A COHTAIHS THIS CONFIGURATION BYTE 

J RESTORE H.L 

; ROTATE BIT IHTO CARRY; THUS CARRY 

I REAMS INTEGRATED CRT NOT PRESENT 

J JUMP IF INTEGRATED CRT PRESEHT 



1 



I -- 

; c 



OHSOLE ■ SERIAL CRT 
IH U8CS 
AHI RRDY 



JHP 



CS2 



;.... ... 

; CONSOLE ■ INTEGRATED CRT 
CSl: 



PUSH 
MVI 
CALL 
AHI 

POP 



B 

B.KBTB 
I0CDR1 
KRDY 



1 GET CRT STATUS 

i IS RECEIVE BUFFER READY? (IF KEY HAS BEEN 

1 DEPRESSED. ZERO BIT HILL BE RESET) 



IHTELLEC HITH IHTEGRATED CRT 

SAVE B.C 

LOAD CRT 8TATUS CONNAHft 

GET CRT STATUS 

IS RECEIVE BUFFER READY? (IF KEY HAS BEEN 

DEPRESSED, ZERO BIT HILL BE RESET) 
RESTORE B.C 
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IOC OBJ SEQ SOURCE STATERENT 

2190 CS2: i CONNOR RETURN POINT FDR CRT,TTY 

FD74 3E00 2191 AVI A, FALSE ; INITIALIZE A-REC TO 00 

FD7& C8 2192 RZ ) RETURN MITH A :* 00 IF HO DATA AVAUAILE 

FD77 2F 2193 CNA 

FD?8 C9 2194 RET ; RETURN KITH A t ■ FF IF DATA AVAILABLE 

2195 ;--- 

219i 2 CONSOLE « BATCH OR USER-DEFINED DEVICE 

2197 CS3: 
F679 FE02 2198 CPI BATCH 1 IS IT BATCH? 

FD7B 3EFF 2199 HVI A, TRUE 

FD7D CB 2200 RZ ; RETURN IF CONSOLE IS BATCH; A :> FF 

FD7E 3EFD 2201 HVI A.CSLOC AND OFFHi CONSOLE * USER DEFIHED LOCAL CONSOLE, SRAHCN 

2202 I TO USER'S DUN STATUS ROUTINE 

F080 C38CFC 2203 JNF BUSER 

2204 IIIJIIinilllMlltlUllltltliMllIIMIlMIIIKUMItttKniMIJIIIUIIIIIIIIIIII 

2205 ) '10CHK' - EXTERNALLY REFEREHCED ROUTIHE 

2206 i PROCESS) GET I/O SYSTEN STATUS 

2207 ; INPUT: 

2208 I OUTPUT: STATUS BVTE RETURHED IN A-RE6 

2209 ; MODIFIED: A 

2210 J STACK USAGE: 2 BYTES 

2211 iiixiiiiMiHiiiiJKHitJniiiniiiiitiiiituniiitiiiiiiJiiiiiiinjiiiitiiini 

2212 IOCHKi 

FD83 3A0300 2213 LDA IOBYT I GET STATUS BYTE 

FD86 C9 2214 RET J RETURN 

2215 ii tit i i iiiii •, iiii iiii ii iiii •, iiii i iiiin mm m it iium mil in a in mil m n 

2216 ; 'IOSET' - EXTERHALLY REFEREHCED ROUTIHE 

2217 i PROCESS: SET I/O CONFIGURATION 

2218 ; INPUT: HEN I/O STATUS BYTE IN C-RE6 

2219 ; OUTPUT: IOBYT CONTAINS HEU I/O CONFIGURATION 

2220 i N0D1FIED: A. C 

2221 J STACK USAGE: 2 BYTES 

2222 ii urn mi; nm mm im ; ii a urn mum ii mm mi i im i mi m n m ii m 

2223 IOBET: 

FD87 79 2224 HOV A.C 

FD88 320300 2229 8TA IOBYT I PUT HEU I08YT IN HEHORY 

FD8B C9 2226 RET ; RETURH 

2227 itiiiii i ii ii i iiiii ii iiiiiti i iiii tiiiiiiim im nm mit i im am nm m am 

2228 I 'HEHCHK' - EXTERNALLY REFEREHCED ROUTIHE 

2229 I PROCESS: RETURN ADDRESS OF COHTICUOUS END OF USER NENORY 

2230 J INPUT: HEU TOP , USER 

2231 1 OUTPUT: ADDRESS IS RETURNED IN B-REG (HSB> AND A-REG CLSB) 

2232 / HODIFIEDI A, B. FLAGS 

2233 I STACK USAGE: 2 BYTES 

22 34 tM!iiiniii>jiiuiuiiii)jiiiiniitiiiu]iiiiiiiiitiniijniijinin;iiiniiiii 
2239 HEHCHK: 

HEHTQP+l J HSB OF ADDRESS OF TOP PAGE OF NENORY 

A ) CHANGE IT TO THE PAGE BELOU THE TOP PAGE 

) RECALL TOP PAGE IS USED RY HONITOR SO 
1 USER SHOULD HOT ACCESS IT 

B.A i 80 HSB GOES IH B-REG 

A. USER AHD OFFH i LSB IN A-REG 

) AB POINTS TO BASE OF USER STACK IN SECOND 
; FROH TOP PAGE OF RAN 

2244 iiiitiiutiiiiiiitiiiiiiiitiiiiiniiiuiiiiiiiiiiiiHiiiitiiiinnitDiiiiitiiii 



FDSC 3AOS0O 


2236 


LDA 


FDBF 3D 


2237 
2238 
2239 


DCR 


FD90 47 


2240 


HOV 


FD91 3EC0 


2241 


HVI 


FD93 C9 


2242 

2243 


RET 
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IOC OBJ 



FD94 ES 

(=095 C5 
FD96 2A0400 
FD9» 2EE9 
FD9B 79 
FD9C FE08 
FD9E D247F8 
FOAI 81 
F0A2 81 
FDA3 4F 
FDA4 0800 
FDA* 09 
FDA? 73 
FDAB 23 
FDA9 72 



FDAA CI 
FDAB El 
FBAC C9 



FDAD CS 

FDAE 0617 

FDBO CDCEFF 

Ft>B3 CI 

FDB4 CS 

F6B5 48 

FDB6 CHUFF 

FDB9 CI 

FDBA CDBBFF 

FDBD C9 



SEQ 

2245 
2246 
2247 
2248 
2249 
2230 
2291 
2292 
2253 
2254 
2255 
2256 
2257 
2298 
2259 
2260 
2261 
2262 
2263 
2264 
2265 
2266 
2267 
2268 
2269 
2270 
2271 
2272 
2273 
2274 
2275 
2276 
2277 
2278 
2279 
22B0 
2281 
2282 
2283 
2284 
2285 
2286 
2287 
2288 
2289 
2290 
2291 
2292 
2293 
2294 
2295 
2296 
2297 
2298 
2299 



SOURCE STATEMENT 

j 'IODEF' - EXTERNALLY REFERENCED ROUT 

> PROCESS: DEFINE USER I/O ENTRV POINT 

; INPUT: SELECTION CODE IN C-REC. USER 

! OUTPUT: 

I MODIFIED: A. FLAGS 

) STACK USAGE: 8 BYTES 

1 EXPLANATION: POINT HL TO TABLE OF US 
I SUBSTITUTE IN THERE THE ADDRESS G 

! 1 li 1 i i II il I lit! i 1 I 1 1 s 



43 

INE 
S 
ENTRY POINT ADDRESS IN D.E 



ER ENTRY 
IVEN BY T 



lllilll 
IODEF: 



It ll i II 

PUSH 

PUSH 

LHLD 

MVI 

NOV 

CPI 

JNC 

ADD 

ADD 

MOV 

MVI 

DAD 

NOV 

IHX 

MOV 



i ; 



: I , 



tilt) 



POINTS IN TOP OF RAN; 
HE U8ER IN DE REGISTERS. 

i i i t i 1 i I i i i I t i i i I i i i / i } i I 



i 1 I 



H f SAVE 

B f 8AVE 

HEMTOP ; GET 

L.XTBL+1 AND OFFHi HL 



A.C 

UCSM 

ERROR 

C 

C 

C. A 

8.0 

8 

H.E 

H 

M.D 



A : • 

INVA 
DOUB 
TRIP 



NIL 
B t C 

XTBL+1 
NON POINT 
LOGICAL 



S TO XTBLM IN TOP PAGE OF 
DEVICE CATEGORY 



RAH 



LID SELECTION CODE 
LE INDEX 
LE INDEX 



H 



CONP 
STOR 

STDR 

A 

S 

i 

REST 

REST 



UTE PROPE 
E BRANCH 

E THE USE 
DDRESS IN 
IT LOOK 
HP <USER- 
ORE B t C 
ORE H t L 



R IHDEX INTO XTBL 
OPERAND IN INSTRUCTION 

R-DEFINED I/O ENTRY ROUTINE 

THE PROPER PLACE IN XTBL. 
S LIKE: 
DEFINED ADDRESS) 



POP 

POP 

RET 
ii i )i n i ii H i in; i ii i > s n ; ; s in > i ii ii i ii it t tt i) i ii i ) i mi i n i ) i > 1 1 1 1 > i a > t •• 1 1 ( 1 1 
i 'UI' - EXTERNALLY REFERENCED ROUTINE 
; PROCESS: INPUT A CHARACTER FROM THE 
i INPUT: B CONTAINS MSB OF PROM ADDRESS 
; C CONTAINS LSB OF PROM ADORES! 
; OUTPUT: data in a-reg ; 

; MODIFIED:*. FLAGS 
i STACK USAGE: 6 BYTES 

UI : 



UPP 
>S 



PUSH 
MVI 

CALL 

POP 

PUSH 

MOV 

CALL 

POP 

CALL 

RET 



8 
B.RPPC 

PI0DR3 

B 

B 

C.B 

PI0DR4 

B 

P10DR2 



IT 

CAL 

SAV 

LOA 

C C 

OUT 

OUT 

RES 

SAV 

C C 

OUT 

RES 

IMP 



IS AS 
LED A 
E B.C 
D THE 
ONTAI 
PUT R 
PUT P 
TORE 
E B.C 
ONTAI 
PUT P 
TORE 
UT PR 



SUNED THE 'UPPS' ROUTINE HAS BEEN 
NO THAT THE UPP UNIT IS READY 

READ PROM CONRAND 
N8 PROM LOU ADDRESS 
EAD PROM COMMAND 
RON LOU ADDRESS 
B.C; 8 C0HTA1HS PROM HIGH ADDRESS 

NS PROM HICH ADDRESS 

ROM HIGH ADDRESS 

B.C 

ON DATA 
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IOC OBJ SEA SOURCE STATEHEHT 

2200 as a a i an i a ss s st 1 1 s a a i a a s ss s s i an i aa i a a i a a s a a s a a s n n s a a i a 

2301 I 'UO' - EXTERNALLY REFERENCED ROUTINE 

2302 J PROCESS: OUTPUT A CHARACTER TO THE UPP 

2303 I INPUT: C CONTAINS THE CHARACTER TO BE NRITTEN INTO THE PRON 

2304 S D CONTAINS THE NSB OF THE PRON ADDRESS 

2305 l E CONTAINS THE LSB OF THE PRON ADDRESS 

2306 i OUTPUT! 

2307 J HQDIFIEDiA, FLAGS 

2308 J STACK USAGE: 8 BYTES 

2309 limn istsi ssssi tssiii is is : an suss s snsi tits in is s si is s sis, nsss s ss ss s is it at 

2310 UO: 

2311 J IT IS ASSURED THE 'UPPS' ROUTINE HAS BEEN 

2312 ; CALLED AND THAT THE UPP UNIT IS READY 
FDBE CS 2313 PUSH B ; SAVE B.C 

FBBF 0616 2314 NVI B.NPPC J LOAD HR1TE PRON COHNAHD 

FfCl 4B 2315 NOV C.E S LOAD PRON LOB ADDRESS 

FDC2 CDCEFF 23U CALL PI0DR3 J OUTPUT VRITE PRON COHNAHD 

2317 J OUTPUT PRON LOU ADDRESS 

FDC5 4A 2318 NOV CO ; LOAD PROH RICH ADDRESS 

FDC6 CDD1FF 2319 CALL PI0DR4 ; OUTPUT PROH HIGH ADDRESS 

FDC9 CI 2320 POP B i RESTORE B.C.' C CONTAINS THE DATA TO BE 

2321 ; BRITTEN TO THE PROH 

FDCA CDD1FF 2322 CALL P10DR4 S OUTPUT DATA TO PROH 

FDCD C9 2323 RET 

2324 i i s a ii i ii is 1 1 1 1 1 1 ii n i it a s s t s; i is n t ii it s it i s i it it i it ii i an i n n i is ii i n ii 1 1 1 

2325 I 'UPPS' - EXTERHALLY REFERENCED ROUTINE 

2326 ) PROCESS: INPUT THE UPP STATUS BYTE 

2327 ; INPUT: 

2328 ; OUTPUT: A-REC COHTAINS THE UPP STATUS BYTE 

2329 J NODIFIEDi 

2330 I STACK USAGE: 8 BYTES 

2331 1 1 1 an i a a t a a i it a t a a i a a i a ii i a a i ii a i a a i a a s a a 1 1 1 a i ii ii i a a i a 

2332 UPPS: 

FDCE C5 2333 PUSH B J SAVE BC 

FDCF 0618 2334 NVI B.RPSTC i B COHTAINS STATUS COHNAHD 

FD01 CDBSFF 2335 CALL PI0DR1 J GET UPP STATUS BYTE 

FDD4 F5 2336 PUSH PSU ; SAVE IT OH THE STACK 

FD05 CDBBFF 2337 CALL PI00R2 I BET PIO DEVICE STATUS BYTE AND ICHORE IT 

FDDB Ft 233B POP PSU I A NOU CONTAINS UPP STATUS BYTE 

FDD9 CI 2339 POP B ; RESTORE BC 

FDDA C9 2340 RET 

2341 (••**•*•*•*••*•*••*••*•*»*•**•••**•*•**•*•*******••»•********•»*••***»•»**«*«»«»« 

2342 )• » 

2343 I* END OF I/O SUBROUTINES, BEGINNING OF RON1T0R SUBROUTINES * 

2344 ;• » 

2345 J******************************************************************************** 

2346 I •-•-•-•-»-»-•-•-»-»-»-«-»-»-.-»-*-.-.-.-.-...-»-..»-*-»-»-.-»-....,-.. *.,.«.,.» 

2347 I 'BYTE' - ENTERED VIA CALL FRON 'R' COHNAHD 

2348 I PROCESS: READ TUO 8-BIT ASCII CHARACTERS, DECODE INTO ONE 8-BIT BINARY BORD 

2349 ; INPUT: D CONTAINS RUNHIHG CHECKSUN 

2350 i OUTPUT: DECODED BYTE IH A-REG, RUHHING CHECKSUN IN D-REG, ZERO BIT SET OR RESET 

2351 ; NODIFIED: A.F.C.D 

2352 I STACK USAGE: 

2353 BYTE: 

FDDB CS 2354 PUSH B ; SAVE B.C 
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LOC OBJ SEQ SOURCE STATENEHT 

FDDC CD5SFF 23S9 CALL SIX ) READ ONE ASCII CHAR FROM TAPE, PUT IN A-REC 

F6DF CD98FE 2356 CALL NIBBLE ; CONVERT 8-BIT ASCII TO 4-BIT HEXADECIMAL VALUE 

FDE2 07 2357 RLC I SHIFT FOUR PLACES TO THE LEFT 

FBE3 07 2338 RLC 

FDE4 07 2399 RLC 

FDE5 07 2360 RLC J HOVE HEX CHAR TO 4 MSB OF A-REG 

FDE6 4F 23(1 NOV C.A J STORE TEMPORARILY IN C 

FDE7 CD5IFF 2362 CALL RIX ; CET ANOTHER ASCII CHAR FROH READER 

FDEA CD98FE 2363 CALL NIBBLE ; CONVERT TO 4 BIT HEX; HOW LSB OF A-REC 

FDED Bt 2364 ORA C ; ASSEMBLE IT ALL TOGETHER 

FDEE 4F 2365 NOV C,A I STORE IT TEMPORARILY IN C 

FDEF 82 2366 ADD » ; UPDATE CHECKSUM (ZERO BIT IS SEWRESET) 

FDFO 37 2367 NOV D,A ; D CONTAINS UPDATED CHECKSUM 

FDF1 79 2368 NOV A,C ; LOAD THE CONVERTED IORD 

FDF2 CI 2369 POP B 

FDF3 C9 2370 RET i RETURN 

23 71 ',// ft ft ttttt tttfttttttttttt tttttttttf ttfttt ft tl t////ttf tt t///t /////////(///// 

2372 I 'CDNV - ENTERED VIA CALLS FROM ' DBYTE ' , * HXD ' , ' PBY TE ' ROUTINES 

2373 * PROCESS! CONVERT 4 BIT HEX VALUE TO ASCII CHARACTER 

2374 ; INPUT ! 0, 1,2,3,4, 9,6,7,8, 9, A, B.C. D,E. OR F IH HEX IH A-REG 

2375 ; OUTPUT: 30H, . . . , 39H, 4 IN, . . . , 46H IN C-REG 

2376 > MODIFIED! A, FLAGS, C 

2377 ) STACK USACEt 

2378 ) 

2379 CDNV! 

FDF4 E60F 2380 AHI OFH ; ONLY 4 LSB ARE SIGNIFICANT, SO MASK 4 NSB 

FDF6 C690 2381 ADI 90H 1 SET UP A-REG SO THAT A-F CAUSE CARRY 

FDF8 27 2382 DAA 

FDF9 CE4D 2383 ACI 40H ; ADD IH CARRY AND ADJUST UPPER NIBBLE 

FDFB 27 2384 DAA 

FDFC 4F 2385 NOV C,A I STORE CONVERTED RESULT IH C-REC 

FOFD C9 2386 RET i RETURN 

2387 if t ft ft ft ft fftttftft tttfffftttft ttt ft ttt //ft//////// t ft ////// Utfttt fttff //ft 

2388 ; 'CRLF' - ENTERED VIA CALLS FROH ' G' ,' H ',* B' ,' R ','«'.' X' CONHANDS AND 

2389 > 'START' ROUTIHE 

2390 I PROCESS) TYPE CARRIAGE RETURH AND LINE FEED ON LOCAL CONSOLE 

2391 t INPUT: 

2392 ; OUTPUT) 

2393 ; MODIFIED) 

2394 i STACK USAGE: 
2393 CRLF) 

FDFE CDDEFC 2396 CALL CORC i OUTPUT <CR) ON CONSOLE 

FEOI OD 2397 DB CR 

FEOZ CDDEFC 2398 CALL CORC 1 OUTPUT CLF> ON CONSOLE 

FE05 OA 2399 DB LF 

FE06 C9 2400 RET 

2401 Itff/fttttftttftttfftttttttttttttttttttt/tttttffttttttfttttttftttttttf/tt/f/t 

2402 J 'DADR' - ENTERED VIA CALL FROM *D* COMMAND 

2403 I PROCESS! PRINT CONTENTS OF HL IN HEX FORHAT ON LIST DEVICE 

2404 J INPUT) HL CONTAINS (LOU ADDRESS) OF '0* CONNAND 
2409 » OUTPUT) 

240C I MODIFIED) A 

2407 I STACK USAGE) 

2*08 DADRi 

FE07 PC 2409 NOV A,H I PRINT NSB OF LOU ADDRESS 
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IOC 08J 



SEQ 



SOURCE STATEMENT 



FEQ8 COOCFE 
FEOB 70 



FEOC F5 

FEOO OF 

FEOE OF 

FEOF OF 

FEIO OF 

FE11 CDF4F0 

FE t 4 CD14FD 

FE 17 Fl 

FE1B CDF4FD 

FEtB C314FD 



FE1E 0E70 

FE20 00 

FE21 C220FE 

FE24 C9 



FE2S 23 

FE26 SE 

FE27 3A0S00 

FE2A 57 



FE2B 23 

FE2C 46 

FE2D 23 

FE2E 1ft 



2410 
2411 
2412 
2413 
2414 
2415 
24H 
2417 
2418 
2419 
2420 
2421 
2422 
2423 
2424 
2425 
2426 
2427 
2428 
2429 
2430 
2431 
2432 
2433 
2434 
2435 
2436 
2437 
2438 
2439 
2440 
2441 
2442 
2443 
2444 
2445 
2446 
2447 
2448 
2449 
2450 
2451 
2452 
2453 
2454 
2455 
2456 
2457 
2458 
2459 
2460 
2461 
2462 
2463 
2464 



08 



• •• 
/// 
' DB 

PRO 
IMP 
OUT 
MOO 
5TA 
YTE 



CA 

MO 

«*»JM 

///// 

YTE' 

CESS: 
UT: A 
PUT: 
IFIEO 
c« US 



J PRINT LSB OF 108 AOORESS 



LL DBYTE 

y a.l 

P DBYTE 

/////////////////////////////////////////////////////////////////// 

- ENTERED VIA CALLS FROM 'D' COMMAND AHD 'DADR' ROUTINE 
ENTERED VIA FALL-THRU FROM 'OADR* ROUTINE 
LIST A BYTE ON THE LIST DEVICE AS TNO ASCII CHARACTERS 
CONTAINS THE BYTE TO BE LISTED 



AGE: 



/// 
*DE 
PRO 
IMP 

OUT 
NOD 
STA 
LAY 

Yl: 



PUSH 
RRC 
RRC 
RRC 
RRC 
CALL 
CALL 
POP 
CALL 
JHP 
tttfttt 
LAY' - 
CESS: 1 
UT i ONE 
PUT: RD 
IFIED: 
CK USAG 



PSH 



CONV 
LOH 
PSH 
COHV 
LOH 
//////// 
ENTERED 
.0 MS. D 
MS 

UTINE ID 
C. FLAGS 
E: 2 BYT 



4-7 OF A- 
A-REG TO 



REG 

1 ASCII CHAR 



; SAVE A COPY OF A-REG 



; HANT TO LOOK ONLY AT BITS 

; CONVERT 4 NSB OF ORIGINAL 

; OUTPUT ON LIST DEVICE 

i RETRIEVE ORIGINAL VALUE 

; CONVERT 4 LSB OF ORIGINAL A-REG TO 1 ASCII CHAR 

; OUTPUT ON LIST DEVICE 

//////////////////////////////////////////////////////////// 

VIA CALL FROM 'RI' ROUTINE 
ELAY 



LES FOR 1.0 MS. 
ES 



HV I 



COHENS 



LOAD 1 MS. CONSTANT (USE 3BH IH ICE ENVIRONMENT) 



OR 



/// 
* DR 
PRO 
INP 
OUT 



HOD 
STA 

EG: 



DC 
JH 
RE 
///// 
EC' - 
CESS: 
UT: H 
PUT: 



IFIED 
CK US 



R C ; DECREMENT COUNTER 

2 DLY1 ; JUMP IF NOT EXPIRED 

T s RETURN 

Hftiitttttttntftttnttiittttttitintttiittt/untttttnttttitnti 

EHTERED VIA CALL FROM 'X' CONHAHD 

DISPLAY THE CONTENTS OF A USER REGISTER 
L POINTS TO CHARACTER IH ACTBL OF 'X' COHHAND 
NL POINTS TO NEXT CHARACTER IH ACTBL. 
DE CONTAINS ADDRESS OF REGISTER LOCATION 
B CONTAINS REGISTER PRECISION 



AGE: 



1HX 
MOV 
LDA 
MOV 



INX 

MOV 
INX 
LDAX 



H 

E.N 

NEHTOP+1 

D.A 



H 
B.N 

H 
» 



HL POINTS TO LOCATION ENTRY IN ACTBL OF 'X' 
INCREMENT HL TO POINT AT D1SPLACENENT 

D := MSB OF ADDRESS OF TOP PAGE OF MEMORY 
DE POINTS TO THAT PART OF THE EXIT TEMPLATE 

CONTAINING SAVED REGISTER VALUES 
HL POINTS TO PRECISION IN ACTBL 
PRECISION. 0*8 BITS. 1*16 BITS 
POINT AT NEXT REGISTER IDENTIFIER 
8/16 BIT DISPLAY AND MODIFICATION 



COMMAND 
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IOC 08J 



SE8 



SOURCE STATEMENT 



FE2F CD5BFE 

FE32 05 

FE33 F8 

FE34 IB 

FE35 1A 

FE36 C35BFE 



FE39 CD74FE 

FE3C E3 

fE3t> ES 

e E3E OP 

FE3F D246FE 

FE42 C247F8 

FE43 C9 

FE46 C239FE 

FE49 C347F8 



FE4C 23 

FE4D ?C 

FE4E 85 

FE4F 3? 

FE50 C8 

FE51 ?B 

FE52 95 

FE53 ?A 

FE54 9C 

FE55 C9 



FE56 7C 

FE5? CD5BFE 



2465 
2466 
246? 
2468 
2469 
2470 
2471 
2472 
2473 
2474 
2475 
2476 
2477 
2478 
2479 
2480 
2481 
2482 
24B3 
2484 
24B5 
2486 
2487 
2488 
2489 
2490 
2491 
2492 
2493 
2494 
2495 
2496 
2497 
2498 
2499 
2500 
2501 
2502 
2503 
2504 
2505 
2506 
2507 
2508 
2509 
2510 
2511 
2512 
2513 
2514 
2515 
2516 
2517 
2518 
2519 



Ittttt 

• EXPR 
PROCE 
INPUT 
OUTPU 
NODIF 
STACK 
EXPR: 



CALL LBVTE ,' MSB OF 16 BIT REG. 

OCR 8 ; TEST PRECISION 

RH ) 8 BIT DISPLAY, RET 

OCX D 

LDAX D 

JHP LBYTE ; LS6 OF 16 BIT REG 

itittt/tuttu.tt/tttttttitttntttttt/intftn 

• - ENTERED VIA CALLS FROM ' D ' , ' E ' , ' F ' , ' H ' , ' H 
SS: EVALUATE EXPRESSION • < EXPR > , < EXPR> - < EXPR> 
: C-REG CONTAINS THE HUHBER OF PARAMETERS RED 
T: STACK CONTAINS TNE PARAMETERS IH REVERSE 
IEO ! F.C.H.L, SP 
USAGE: 



CALL 
XTHL 

PUSH 

DCR 

JNC 

JNZ 

RET 



PARAIi 



N 
C 

EXO 
ERROR 



CET A HEXADECIMAL 
PUT THE PARAHETER 

CONTAINS RETURN 
PUT RETURN ADDRESS 
DECREMENT PARAMETE 
JUMP IF COHHA EHTE 
INCORRECT PARAN CO 



EXO i 



t/f/ft 

'HILO 
PROCE 
INPUT 
OUTPU 

NODIF 
STACK 
HILO: 



JNZ EXPR ; CET ANOTHER PARAHE 

JHP ERROR (HOT TERMINATED BIT 

tittitttuttftttntttttnttttrttmtftntttii 

• - ENTERED VIA CALLS FROM ' D' , ' F * , ' M' , ' V ' CD 

SS: COMPARE HL WITH DE 

: ADDRESS VALUES IH HL AND DE 

T: IF HL <» DE THEN CARRV « 0; 

IF HL > DE THEN CARRY = 1 
IED: HL.A.F 
USAGE : 



ALL OF B BIT REG 
URH 



tttfttf/titritttttnttttittf 
','*','*• COMMANDS 

II 

UIRED (1,2, OR 3) 
RDER 



PARAMETER. RETURNED IN HL 
IN THE STACK! HL HOB 

ADDRESS OF CALL TO 'EXPR' 

ON TOP OF STACK 
R COUNT; CARRY BIT UNAFFECTED 
RED (PARAH CALLS PCHK) 
UNT 



TER 
H CR 

trtflt/ttlttltllttttttittttt 
HHAHDS 



tifift 
'LADR 
PROCE 
INPUT 
OUTPU 
NODIF 
STACK 
LADR: 



I NX 
NOV 
ORA 

STC 

RZ 

NOV 

SUB 

NOV 

SBB 

RET 

t/ttt 

' - E 

SS: P 

: HL 

T: 

IED: 
USAC 

NOV 
CALL 



H 

A, H 
L 



INCREMENT HL ADDRESS 

TEST FOR HL = 

ZERO BIT SET IF H=L=00, I.E. HL MUST 

HAVE BEEH FFFFH 
CARRY := 1 



DE - HL, SET/RESET 
(LSB OF HIGH ADDR) 



H ; (MSB OF HIGH ADDR) 

i RETURN 
tUtttttttitltttttltttttfttttlUttlttttt 
HTERED VIA CALLS FROM 'H' COMMAND AHD 'R 
RINT CONTENTS OF HL IN HEX ON LOCAL CONS 
COHTAIHS THE HEX VALUE TO BE DUTPUM16 B 

H.L. A 
E: 



CARRY 

- (MSB OF LOB ADDR) 

- (MSB OF LOU ADDR) 

t/t/if(/t//,>/il?/tfil/t/l 
ESTART' ROUTINE 
OLE DEVICE 
ITS) 



A.H 
LBYTE 



; PRINT 8 NSB OF HEX VALUE OH CONSOLE 
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IOC OBJ 



FE5A 7D 



FE5B F5 

FE5C OF 

FE5D OF 

FE5E OF 

FE5F OF 

FE60 CD64FE 

FE63 ?1 



FE64 CDF4FD 
FE67 C395FC 



FE6A OEOD 

PE&C CD14FD 

FE4F OEOA 

c Z7l C314FD 



FE74 CDC5FE 
FE?7 CA47F8 



SEO 

2320 

2S21 

2522 

2523 

2524 

2525 

2526 

2527 

2528 

2529 

2530 

2531 

25 32 

2533 

2534 

2535 

2536 

2537 

2538 

2539 

2540 

2541 

2542 

2543 

2544 

2545 

2546 

2547 

2548 

2549 

2350 

2551 

2552 

2553 

2554 

2555 

2556 

2557 

2558 

2559 

2560 

2561 

2562 

2363 

2564 

2565 

2366 

2567 

256B 

2569 

2570 

2571 

2572 

2573 

2574 



SOURCE STATEMENT 

HOV A.L 
;.*«.*.*JHP LBYTE ; PRINT 8 LSI OF HEX VALUE ON CONSOLE 

\ttft/uttt>ttttitttitttttt/ttf(t/ttittintnttttttttnti/tftittitttttttttui 

i 'LBYTE' - ENTERED VIA CALLS FROM 'S' COMMAND AND ' DREG' .' L APR ' ROUTINES 
J ENTERED VIA JUMP FROM 'DREG' ROUTINE 

ENTERED VIA FALL-THRU FROM 'LADR' ROUTINE 
PROCESS: LIST A BYTE AS TWO ASCII CHARACTERS 
IHPUTi A-REG CONTAINS THE 8 BITS TO BE CONVERTED TO ASCII 
OUTPUT: 
MODIFIED: A,F 
STACK USACE: 6 BYTES 
LBYTE: 

PUSH PSH i SAVE A-RE6 

RRC 
RRC 
RRC 
RRC 
CALL 
POP 
»«*»*«*JHP 



HXD 
PSH 
HXD 



; 



LOOK ONLY AT 4 MSB OF THE BYTE VALUE 
COHVERT IT TO ONE ASCII CHAR AND OUTPUT IT 
RETRIEVE ORICIHAL VALUE 
COHVERT 4 LSB OF BYTE TO ASCII AND OUTPUT IT 

ttttttttttitttnttttiittttttnuntitttttftttfttttrtttnitttfttttitniitttut 

'HXD' - ENTERED VIA CALL FROM 'LBYTE' RDUTIHE 

ENTERED VIA FALL-THRU FROM 'LBYTE' ROUTINE 
PROCESS: COHVERT 4 LSB IN A-REG IHTO OHE ASCII CHAR IN A-REG, PRINT IT 

OH LOCAL COHSOLE DEVICE 
IHPUP HIBBLE TO BE COHVERTED IS IN BITS 0-3 OF A-REG 
OUTPUT: 

MODIFIED: A-REG 
STACK USACE: 
HXD: 

CALL COHV ) COHVERT 4 BITS TO ONE 8-BIT ASCII CHAR 

JHP COM ; OUTPUT OH LOCAL COHSOLE 

uutnttftnittittnitiitttttititituittmuttittttuittmtttuittumtti 

'LCRLF' - ENTERED VIA CALL FROM ' D' COMMAND 
PROCESS: PRIHT <CR>,<LF> OH LIST DEVICE 
INPUT: 
OUTPUT: 
MODIFIED: C 
STACK USAGE: 4 BYTES 
LCRLF: 

HVI C.CR 

CALL LON : OUTPUT <CR> TO LIST DEVICE 

HVI C.LF 

JHP LON ; OUTPUT <LF> TO LIST DEVICE 

•.ttnttftiHt/f/tf/tiitfuttt/ttftttttfftifttttittttftttitttnttttttnttuittin 

1 'PARAM' - EHTERED VIA CALLS FROM 'G'.'S' COMMANDS AND ' EXPR' ROUTIHE 

; 'PAO' - ENTERED VIA CALLS FROM 'G'.'S'.'X' COHMAHDS 

i PROCESS: COLLECT A HEXADECIHAL PARAHETER 

J INPUT: 

; OUTPUT: HEXADECIHAL PARAHETER IH HL 

; MODIFIED: A.F.B.H.L 

; STACK USAGE: 

PARAM: 

CALL 

JZ 



PCHK 
ERROR 



GET FIRST CHARACTER 
DISALLOW HULL PARAHETERS 
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LOC OBJ 



SEO 



SOURCE STATEMENT 



FE7A 210000 

FE7D 47 
FE7E CD98FE 

FE81 DA90FE 
FE64 29 
FE8S 29 
FE84 29 
FF.37 29 
FE88 65 
FE89 6F 
FESft CD11FF 
FESD C37DFE 

FE90 78 
FE9i CDCBFE 
FE94 C247F8 
FE97 C9 



FE98 D630 

FE9A 08 

FE9B C6E9 

FE9D 08 

FE9E C606 

FEAD F2A6FE 

FEA3 C6D7 

FEA5 D8 



FEA6 C60A 
FEA8 B7 
FEA9 C9 



FEAA 7C 
FEAB CDAFFE 
FEAE 70 



2975 
2576 
2577 
2578 
2579 
2580 
2581 
2582 
2583 
2584 
2585 
2586 
2587 
2588 
2589 
2590 
25 91 
2592 
2593 
2594 
2595 
2596 
2597 
2598 
2599 
2600 
2601 
2602 
2603 
2604 
2605 
2606 
2607 
2608 
2609 
2610 
2611 
2612 
2613 
2614 
2615 
2616 
2617 
2618 
2619 
2620 
2621 
2622 
2623 
2624 
2625 
2626 
2627 
2628 
2629 



PRO! 
PA1 i 



LXI 



NOV 
CALL 



JC 
DA 
DA 
DA 
DA 
OR 
MO 
CA 
JH 



PA2> 



HO 

CA 

JH 

RE 

flll///ll 

'NIBBLE' 

PROCESS: 



INPUT: 8 
OUTPUT: 

MODIFIED 
STACK US 
NIBBLE: 

SU 
RC 
AD 
RC 
AD 
JP 
AD 
RC 



D 
D 
D 

D 

A 

V 

LL 

P 

V 

LL 

Z 

T 

III// 
- EH 
BECO 
F ILT 
0-1, 

-BIT 

VALID 

CARBA 

: A. 

AGE: 



; INTIALIZE HL < * 0000 

SAVE CHAR IN CASE IT'S A DELIMITER 

CONVERT THE ASCII CHARACTER TO HEX; MUST BE 

0-9. A-F; IF HOT THE CARRY BIT IS SET 
HOT LEGAL CHAR, TREAT AS DELIMITER 
»2 
*4 
*8 

•16 SHIFT THE OLD HEX VftLUES 4 PLACES TO LEFT 

PUT MEN HU VftLktE IH 4 LsH OF L-REG 

GET SUBSEQUENT CHARACTERS 
DECODE NEXT CHARACTER 

A :« 8 :* DELIMITER CHARACTER 
IS IT A VALID DELIMITER? 
JUMP TO ERROR IF IT ISN'T 



HI : 

AD I 

ORA 

RET 
illlllllll/l III 
i 'PADR' - EHTE 
l PROCESS: PUHC 
i INPUT: HL CON 
; OUTPUT: 
: MODIFIED: A 
; STACK USAGE: 
PADR: 

MOV 

CALL 

MOV 



H.O 

8, A 
NIBBLE 

PA2 

H 

H 

H 

H 

L 

L, A 

TI 

PA1 

A.B 
P2C 
ERROR 

Ill/Ill 
TERED V 
DE B-BI 
ER OUT 
2. 3,4.5 
ASCII C 
HEX EB 
CE IH A 
FLAGS 
2 BYTES 

IF THE ASCII CHAR IS 8ETHEEN 00 AHD 2FH, 

THEH RETURN HUH CARRY = 1 
IF THE ASCII CHAR IS GREATER THAN 46H, 

THEH RETURN WITH CARRY = 1 

6 ; ORIGIHAL ASCII CHAR HAS BETWEEN 30H AHD 46H IHCL . 
HIO J JUMP IF IT HAS 41H THRU 46H (I.E. A-F) 

7 ; ORIGIHAL ASCII CHAR HAS BETVEEH 30H AND 40H INCL, 
RETURN KITH CARRY = I IF ASCII CHAR HAS 

BETHEEH 3AH AHD 40H INCLUSIVE 
VALID VALUE: 30H-39H, 41 H-4 6H 
10 ; A-REG HOH COHTAINS HEX E9U I V . C 0-9 , A-F ) 

A ; CLEAR ERROR FLAG (I.E. RESET CARRY BIT) 

RETURN KITH VALID VALUE 
It//// It It tt t Hit I tilt I It It I It I f I It It f It ft I It tt I It tt I It I 
RED VIA CALLS FROM 'E','H' COMMANDS 
H CONTENTS OF HL IN HEX OH PUNCH DEVICE 
TAINS 8-BIT LOAD ADDRESS 



I II It till! lit// //tilt III! I If It .' .'/ It t It It I It It It 

IA CALLS FROM ' BYT E* , ' PfiR AM' , ' P AO ' ROUTINES 

T ASCII CHAR IH A-REG IHTO 4-BIT HEX DIGIT IH A-REG, 

ALL CHARACTERS HOT IH THE ASCII CODING SE8UEHCE 

, 6,7, 8.9.A.B.C. D.E.F . 

HAR IH A-REC 

OIYALEHT IH A-REG AND CARRY - 0, OTHERHISE 

-REG AND CARRY * 1 (IHDICAT1HE ILLEGAL CHARACTER) 



4 BYTES 

A.H 

PBYTE 

A.L 



A '.' MSB OF LOAD ADDRESS 

EMIT FRAMES 3 14 

A :« LSB OF LOAD ADDRESS 
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SO 



IOC OBJ 



FEAF SF 

FE80 OF 

FEBl OF 

FE32 OF 

FEB3 OF 

FEB4 C.DF4FD 

FEB? CDE9FC 

FEBft 78 

FE8B CDF* 1 ^ 

FEBE CDE9FC 

FECI ?B 

FEC2 82 

FEC3 57 

FEC4 Z9 



FEC5 CD61FF 

FEC8 e E20 
FECA f.8 
FECB FE2C 
FECO C8 
FECE FEOD 
FEDO 37 
FEOl C8 
PED2 3F 
FED? C9 



SEO 

2630 
2831 
2832 
2633 
2634 
2635 
2636 
2637 
2638 
2639 
2640 
2641 
2642 
2643 
2644 
2645 
2646 
2647 
26 4 3 
26 4 9 
2650 
2631 
2652 
2653 
2654 
2655 
2656 
2657 
2658 
2659 
2660 
2661 
2662 
2663 
2664 
2665 
2666 
2667 
2668 
2669 
2670 
2671 
2672 
2673 
2674 
2675 
2676 
2677 
2678 
2679 
2680 
2681 
2682 
2683 
2684 



SOURCE STATEHEHT 



******* 

tttlttt 

"PBYTE 

PROCES 
IHPUT: 
OUTPUT 
HODIFI 
STACK 
P8YTE: 



itlt PBYTE ; EMIT FRAMES 5 16 

ttfi/tttttft/tttuttnttttttttttttittnttttifttittntf/tttiimit 

' - ENTERED VIA CALLS FROM '£'.*«' COMMANDS AND *PAOR' ROUTINE 

ENTERED VIA FALL-THRU FROM ' PADR' ROUTINE 

S: PUNCH A BYTE AS 2 ASCII CHARACTERS 

A-REG CONTAINS BYTE TO BE CONVERTED, ft CONTAINS RUHNING CHECKSUM 
: D CONTAINS UPDATED CHECKSUM 
ED: A.F.D.E 
USAGE: 



Ui-ttftt 
: 'PCHK' 
.: 'P2C 
i PROCES 
: IHPUT: 
i OUTPUT 



, HODIFI 
J STACK 
PCHK: 



NOV 
RRC 
RRC 
RRC 
RRC 
CALL 
CALL 
NOV 
CALL 
CALL 
NOV 
ADD 
NOV 
RET 
//// 
- E 
- EN 
S: T 



E. A 



COHV 

PO 

A.E 

COHV 

PO 

A.E 

D 

D. A 



SAVE BYTE TO BE CONVERTED IN E-REG 



LOOK ONLY AT 4 HSB OF THE BYTE 
CONVERT IT TO 1 ASCII CHARACTER 
PUHCH IT 

NOV LOOK ONLY AT 4 LSB OF BYTE 
CONVERT It TO ONE ASCII CHAR 
PUNCH IT 



i UPDATE THE RUNNING CHECKSUH 
.- STORE IT BACK IH THE D-REG 
; RETURN 

ttttttftttttttttttnt/tta/ttuuttt/tf/ttuttttftttitttrtmttnttt 

HTERED VIA CALLS FROH 'G'.'S'.'X' COMMANDS AND 'PARAN' ROUTINE 

TERED VIA CALLS FROH ' P AR AM' , ' P AO ' ROUTIHES 

EST FOR HULL IHPUT PARAMETER (LOOK FOR SPACE. CONHA . OR (CR>> 



: CHARACTER IN A-REG 
IF SPACE OR COHHA, 
IF <CR>, 
IF NONE OF ABOVE' 

ED: ft, FLAGS 

USAGE: 4 BYTES 



P2C: 



CALL 

CPI 

RZ 

CPI 

RZ 

CPI 

STC 

RZ 

CMC 

RET 



TI 



CR 



THEN ZERO * 1 AND CARRY * 
THEH ZERO > 1 AMD CARRY = 1 
THEN ZERO • AHD CARRY « 



GET A CHARACTER 



IF SPACE. THEN ZERO > 1 t CARRY * 
IF COHNA. THEN ZERO = I t CARRY = 

IF <CR>, THEN ZERO ■ 1 I CARRY * 1 



i IF HOHE OF THE THREE. THEH ZER0«CARRY«0 
llttttttt/iUtttUtitttnttttMttttttfttittttttttlttttttttttttntltttHtttfttH 

!/ 'RESTART' - ENTERED VIA JUMP FROH LOCATION 

;/ PROCESS: BREAKPOiHT/IHTERRUPT/RESTART PROCESSING 

1/ IHPUT: 

it OUTPUT: 

:/ HODIFIED: 

it EXPLANATION! 

;/ THIS ROUTIHE IS EHTERED VIA A RESTART (RST 0) IHSTRUCTIOH. THE 
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LOC OBJ 



SEQ 



SOURCE STATEMENT 



FED4 F3 

FED5 E5 

FED* DS 

FED7 C5 

FEDB FS 

FED9 61 

FEDA ES 



FEDB 2A0400 
FEDE 2ECC 

FEED 6E 
FEE1 DBFC 

FEE? 67 
FEE4 E3 

FEES DS 

FEE6 3EFE 
FEEB D3FC 
FEEH 2A0400 
FEED 2ED2 
FEEF EB 
FEFO 210C00 
FEF3 3» 



2S83 

2(86 
2(87 
2SOB 
2(89 

2(90 
2(91 
2(92 
2(93 
2(94 
2(93 
2(96 
2(97 
2(98 
2(99 
2700 
2701 
2702 
2703 
2704 
2703 
2706 
2707 
2708 
2709 
2710 
2711 
2712 
2713 
2714 
2715 
2716 
2717 
2718 
2719 
2720 
2721 
2722 
2723 
272 4 
2725 
2726 
2727 
2728 
2729 
2730 
2731 
2732 
2733 
2734 
2735 
27 36 
2737 
2738 
2739 



1HSTRUCTI 
OR IS IHP 
INTERRUPT 
PROCESS A 
FOLLOWING 

1 . THE 

OF 

2 . PRO 

3. THE 
REP 
AND 

4. TES 
OCC 
ADO 
A. 



5. RET 



OH IS 
UT VI 

SB 
MD TU 

HANK 

USER 
THE U 
GRAN 

HOHI 
RESEN 

STOR 
T TO 
URRED 
RESS. 
IF IT 
INTER 
IF IT 
H AND 
( PUSH 
INTER 
TRAP 
URN C 



ENCO 
A A L 
ITCH) 
RNS C 
ER: 

EHVI 
SER'S 
THE B 
TOR'S 
TIHG 
ED IN 
SEE I 

(VAL 



UNTERED EITHER 
OCAL CONSOLE IN 
THIS ROUTINE 
OHTRDL OVER TO 



IH THE USER PROGRAM (AS A BREAKPOINT) 
TERRUPT (I.E. USER HAS ACTIVATED THE 

SAVES THE STATE OF THE CALLING 
THE MONITOR. THIS IS DONE IN THE 



ROHNEHT IS SAVED BY PUSHING THE REGISTERS ON TOP 

OUH WORK STACK. 
259 BITH THE HO 

EXIT TEMPLATE 
THE USER'S STAT 

THE APPRDPRIAT 
F THE POINT AT 
UE OF PROGRAM C 



HITOR'S OBH INTERRUPT MASK REGISTER. 
IS FOUHD AHD THE REGISTER VALUES 
E ARE POPPED OFF THE USER UORK STACK 
E PLACES IN THE EXIT TEMPLATE. 
BHICH USER PROGRAM IHTERRUPTIOH 
OUHTER) COINCIDES WITH A BREAKPOINT 



DOESN'T, THEN RESTA 
RUPT SO SEND EDI TO 
DOES, THEN PROGRAM 
L VALUES AHD TO 2) 
ED OH STACK AT TINE 
RUPT). ALSO, RESTORE 
ADDRESSES. 
OHTRDL TO THE NOHITO 



RT CODE WAS EHTERED VIA A CDHSOLE 
THE 8259. 

THE EXIT CODE TO 1) LOAD THE CORRECT 
JUMP TO THE ADDRESS IHDICATED BY THE PC 
OF RST INSTRUCTION OR WHEN CONSOLE 
THE TRAP VALUES AT THE PROPER 

R (BY JUMPING TO START). 



ttttttttttttttiftttttttir//ititntttttitttintttttitttiitt/itrntttttttttmtt 

START: 



DI 

PUSH 

PUSH 

PUSH 

PUSH 

POP 

PUSH 



LHLD 
HVI 

MOV 
IH 

MOV 
XTHL 

PUSH 

HVI 

OUT 

LHLD 

HVI 

XCHG 

LXI 

DAD 



H 
D 
B 

PSW 

D 

H 



DISABLE IF SOFTWARE TRAP 

SAVE USER'S ENVIRONMENT 

SAVE H,L 

SAVE D,E 

SAVE B,C 

SAVE A, FLAGS 

TEMPORARILY SAVE PSW IH t E 

DUMMY PUSH TO RESERVE SPACE IH STACK FOR 

CURREHT INTERRUPT MASK AHD CONFIGURATION 

BYTE 



MEHTOP 

L, ILOC-1 AHD OFFH; HL 



L.N 
S0CP1 



H, A 



D 

A. NOT INTO 

S0CP1 

HENTOP 

L.EXIT AHD OFFH 

H, 12 
SP 



HOW POIHTS TO CONFIGURATION BYTE IH 
EXIT CODE IH TOP PAGE OF RAH 
L HOW CONTAINS THIS CONF I CUR ATI OH BYTE 
IHPUT CURREHT INTERRUPT MASK REGISTER --- 

THIS MASK IS THE USER'S, SO SAVE IT 
H NOW CDNTAIHS THIS INTERRUPT MASK 
THE INTERRUPT HASK AHD COHFI GUR AT I OH BYTE 

ARE HOW ON TOP OF THE USER STACK 
NOV PUT THE ORIGINAL PSW ON TOP OF THE STACK 
SET HOHITOR'S DEFAULT INTERRUPT MASK 
OUTPUT HEW HASK 

HL NOV POINTS TO EXIT CODE AT TOP OF RAH 
SO NOW DE POINTS TO EXIT CODE AT TOP OF RAH 
H :» DO. L :> OC (DECIHAL VALUE 12) 
EFFECT OF THIS IS TO CUT BACK THE USER'S 
STACK TO WHAT IT WAS BEFORE ENTERING 
THIS RESTART ROUTIHE AHD BEFORE THE PC 
WAS PUSHED OH BY RST OR INTERRUPT. 
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LOC OBJ 

FEF4 Q60S 
FEF6 EB 



FEF? 28 
FEFjB 72 
FEF9 28 
FEFA 73 
FEFB Dl 
FEFC OS 
FEFD C2F7FE 



FFOO CI 

FFOl OB 

FF02 F9 

FF03 2A0400 

FFOS 2EE2 

FFOB ?E 

?F09 91 



FFOA 23 
FFOB C213FF 
FFOE 7E 
FFOF 98 
FFtO CA25FF 



?F13 23 

FFt4 23 

"PIS 7E 

FF16 91 

PFl? 23 

FF18 C220FF 

FFtB 7E 

FF1C 98 

FF1D CA25FF 

FF20 3E20 

FF22 D3FD 



SEQ 

2740 
2741 
2742 
2743 
2744 
2745 

2746 ; 

2747 RSTDs 
2748 

2749 

2730 

2751 

27S2 

2753 

2734 

2 75 5 

2736 

2737 

2738 

2739 S 

2760 

2761 

2762 

2763 

2764 

2763 

2766 

2767 

2768 

2769 

2770 

2771 

2772 

2773 

2774 

2775 

2776 

2777 

2778 

2779 

2780 

2781 RSTA: 

27 82 

2783 

2784 

2783 

2786 

2787 

2788 

2789 

2790 

2791 

2792 RSTB: 

2793 

2794 



SOURCE STATEMENT 



NVI 
XCHS 



DCX 
NOV 
OCX 
HOV 
POP 
OCR 
JN2 



8.3 



J HL CONTAINS THIS 'OLD' STACK ADDRESS. 

; COUNT FOR TRANSFER OF MACHINE STATE 

; TO EXIT TEMPLATE ST0RA6E (MOVE THE STACK) 

1 NL NOB POINTS TO EXIT CODE AT TOP OF RAN 

; DE HON POINTS TO USER STACK AS IT HAS 

; PRIOR TO RST OR CONSOLE INTERRUPT. 



I HO* 

; to 

) IN 



E THE MACHINE STATE FROM THE USER'S STACK 
THE RESERVED AREA IH THE EXIT TEHPLATE 
TOP PACE OF RAN. 
B-S ! B-4 ! B = 3 ! 8=2 ! B*l 



•!• 



. I . 



H 

H.O 

N 

n,z 

D 
B 

RSTO 



JSLOC»MSB(SP)!ALOC»A ! ILOC-INT ! BLOC-B ! HOC "6 
) ! ! ! ! 

; «LSB(SP)!FLOC>FLG> »Fl G ! CLOC-C ! ELOC-E 

JDE»AF !DE<IKT,F!DE*BC !DE«DE IDE'HL 

;B*4 !8»3 !B»2 !B«1 !B»0 



POP 8 

OCX 8 

SPHL 

LHLD MEMTOP 

NVI L.TLOC AMD OFFH 

MOV A.H 

SUB C 



IKX H 

JH2 RSTA 

NOV A.H 

SBB 8 

J2 RST1 



IHX N 

IKX H 

NOV A.N 

SUB C 

IHX H 

JNZ RSTB 

MOV A.N 

SBB 8 

it RST1 

NVI A.EOI 

OUT SOCPO 



; AT THIS POINT. HL POINTS TO THE BASE OF 

THE NOHITOR STACK (TOS) IH TOP PACE OF 
RAM- OE CONTAINS THE H t L VALUES THE 
USER NAB PRIOR TO ENTERING THE RESTART 
ROOTIHE. 
BC « OLD PC (PUSHED OH USER STACK BT 

RST OR IHTERROPT) 
DECREMENT TO POINT AT TRAPPED CODE 
SP HOB POINTS TO TOS (BASE OF NONITOR STACK) 

NL NOU POINTS TO TLOC IH TOP PAGE OF RAN 

I.E. LSB OF TRAP 1 ADDRESS 
TEST IF THIS IS A PROCRANNED RESTART BR A 

LOCAL CONSOLE INTERRUPT BY COMPARING THE 

PC VALUE KITH TRAP 1 ADDRESS 

A :■ LSB OF TRAP 1 ADDRESS 
HL POINTS TO HS8 OF TRAP I ADDRESS 
PC DID NOT MATCH TRAP 1 ADDRESS 
A :« MSB OF TRAP 1 ADDRESS 

PC HATCHES TRAP 1 --- A PROCRANNED RESTART 
REPEAT SANE STEPS AS ABOVE BUT SEE IF PC 

HATCHES 2ND BREAKPOINT (TRAP 2 ADDRESS) 
NL POINTS TO TRAP 1 OPCODE VALUE 
HL POIHTS TO LSB OF TRAP 2 ADDRESS 
A i * LSB OF TRAP 2 ADDRESS 

HL POIHTS TO HSB OF TRAP 2 ADDRESS 
PC DID NOT NATCH TRAP 2 ADDRESS 
A )> N8B OF TRAP 2 ADDRESS 

PC HATCHES TRAP 2 --- A PROCRANNED RESTART 
NOT A PROCRANNED RESTART. BUT A 

CONSOLE INTERRUPT SO SEHD EOI TO 8259 
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IOC OBJ SEA SOURCE STATEMENT 

FF24 03 2793 INK B ; ADJUST PC FOR LOCAL CONSOLE RESTART 

2796 ; I.E. SET READY TO POINT PC TO 

2797 ; RESUMPTION POINT IN CODE IT HAS 

2798 J EXECVTINC MHEH INTERRUPTED 

2799 ; BC POINTS TO NEXT INSTR TO BE EXECUTED 
2S00 i UHEN CONTROL IS RETURNED TO USER PROGRAM 
2801 RBTl: ; PROGRANNED RESTART AT A BREAKPOINT (TRAP) 
2S02 1 ALSO FALLTHROUGH FROM CONSOLE INTERRUPT 

FF2S 2A0400 2803 LHLD NEHTOP 

FF2B 2EDC 2804 HVI L.LLOC AND OFFN ; HL NOD POINTS TO LLOC IN EXIT CODE IN TOP OF RAH 

FF2A 73 2605 MOV H,E J USER'S L VALUE PRIOR TO RESTART IS STORED IH LLOC 

FF2B 23 2106 INX H 

FF2C 72 2B07 NOV H,D i USER'S H VALUE PRIOR TO RESTART IS STORED IH NLOC 

28 08 ; 

FF2D 2EE0 2S09 NVI l.PLOC-1 AND OFFHJ HL POINTS TO LSB OF JHP INSTR IH EXIT CODE 

FF2F 71 2B10 NOV H.C i SAVE LSB OF USER'S PC 

FP30 23 2811 IHX H 

FF31 70 2812 NOV H . B ; SAVE MSB OF USER'S PC. EFFECT IS TO LOAD THE 

2B13 ; PROPER ADDRESS INTO THE EXIT TEMPLATE FOR THE 

2B14 ; JUMP BACK TO THE USER'S PROGRAM. 

2813 i - 

FP32 CS 2816 PUSH B 

FP33 CDDEFC 2817 CALL COHC 

FF36 23 2818 D6 '•' 

FP37 El 2819 POP H I RETRIEVE OLD PC FOR DISPLAY 

FF38 CDStFE 2820 CALL LADR J DISPLAY PC 

28 21 ) - 

2822 ; CLEAR TRAPS 

FP3B 2A0400 2823 LHLD MEMTOP 

FP3E 2EE2 2824 HVI L.TLOC AND OFFH ; HL HON POIHTS TO TLOC IH TOP PAGE OF RAH 

FF40 1602 2823 HVI D,2 i SET COUNT FOR TOO TRAPS 

2826 RST2! 

FF42 4E 2827 NOV CM ; C :- LSB OF TRAP ADDRESS 

FF43 AF 2828 XRA A 

FF44 77 2829 NOV H,A ; ZERO OUT LSB OF TRAP ADDRESS 

FF45 23 2830 INX H 

FF46 46 2831 NOV B,H ; 8 :• MSB OF TRAP ADDRESS 

FF47 77 2832 NOV H,A ; ZERO OUT HSB OF TRAP ADDRESS 

FF48 23 2833 IHX H ; HL HOB POIHTS TO TRAP VALUE 

FF49 79 2834 NOV A.C ; BC CONTAIHS THE TRAP ADDRESS 

FF4A BO 2835 ORA 8 I TEST FOR VALID TRAP 

FF4B CA30FF 2836 JZ RST3 ; TRAP ADDRESS IS 0. SO NO TRAP TO RESTORE 

FF4E 7E 2837 NOV A.H J GET OPCODE BYTE. I.E. TRAP VALUE 

FF4F 02 2838 STAX B I PUT IT BACK IN CORRECT PLACE IN USER PROGRAM. 

2839 j I.E. REPLACE THE RST IHSTR KITH ORIGINAL 

2840 J OPCODE. 

2841 RST3: 

FF3D 23 2842 IHX H ) POINT TO TRAP 2 ADDRESS IF D=2 

FF51 15 2843 DCR D 

FF52 C242FF 2844 JHZ RST2 i REPEAT FOR TRAP 2 

FFS5 C355F8 2845 JHP START ; EHTER HDHITOR (INTERRUPTS STILL DISABLED) 

2846 \ tttttm/tt tf/ttttt /u ttu trttt mm tint uti tftntttuttttt t tin t tut tttntn 

2847 ; 'RIX' - ENTERED VIA CALLS FROM 'R' COHHAND AND 'BYTE' ROUTINE 

2848 ) PROCESS: BET A CHARACTER FROH READER, HASK OFF PARITY BIT 

2849 ; INPUT: 
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IOC OBJ 



SEO 



SOURCE STATEMENT 



PF58 CDOFFC 

FF5B DA47F8 

FF5E E67F 

FF60 C9 



FF61 C5 

FF62 CDBEFB 

FF65 E67F 

FF6? CD76FF 

FF6A FE03 

FF6C CA47F8 

FF6F 4F 

FF70 CD9FFC 

FF73 79 

FF74 CI 

FP75 C9 



FP76 FE61 
FF78 F8 



FF79 FE7B 
FF7B FO 



FF7C E6DF 
FF7E CJ 



2B30 
2851 
2832 
2BS3 
2854 
2855 
2856 
2857 
2858 
2859 
2860 
2861 
2862 
2863 
2864 
2865 
2866 
2867 
28 68 
2869 
2870 
2871 
2872 
2873 
2874 
28 75 
2876 
2877 
2878 
2879 
2880 
2881 
2882 
2883 
2BB4 
2885 
2886 
28 87 
2888 
2889 
2880 
2891 
2892 
2893 
2894 
2895 
2896 
2897 
2898 
2899 
2900 
2901 
2902 
2903 
2904 



RI 



OUTPU 
MODIF 
STACK 
X: 



T: CHARACTER IN A-REG, 
I EO : A.F 
USAGE: 



BIT 7 IS 



CALL 

JC 

ANI 

RET 



RI 

ERROR 

7FH 



GET CHARACTER FROM REAPER DEVICE 
REAPER TIMEOUT ERROR 
MASK OUT THE PARITY BIT 
RETURN 



•TI' 



PROCE 
INPUT 
OUTPU 
HQDIF 
STACK 



i/tttrtitiftt/utttttn/if/ttituttttttit/itifftttt/uittttiitiut/tfiiri 

- ENTERED VIA CALLS FROM 'A'.'H'.'B' COMMANDS AND ' START' .' PARAM* 

'PAO'.'PCHK' ROUTINES 

ENTERED VIA JUMP FROM 'BREAK' 
SS: INPUT FROM LOCAL CONSOLE. ECHO. RETURN IN A-REG 

Ti CHARACTER IN A-REG 
IED< A.F 
USAGE: 



TI 



PUSH 

CALL 

ANI 

CALL 

CP1 

JZ 

NOV 

CALL 

NOV 

POP 

RET 



CI 

7FH 

UC 

ETX 

ERROR 

C.A 

CO 

A.C 



SAVE STATE OF B- I C-REGS 

GET A CHARACTER FROM THE CONSOLE 

MASK OFF PARITY BIT 

CONVERT TO UPPER CASE 

TEST FOR BREAK 

ABORT COMMAND 

MOVE INPUT CHARACTER TO C-REG 

ECHO IT 



:/ 



iff ft 

'UC 

PROCE 

INPUT 

OUTPU 

NODIF 

STACK 

: 



B I RESTORE STATE OF 8 1 C 

; RETURN 

tttit/tttttitHttttttHtittttiitittuttttimttittttttitrttitimtttim 

- ENTERED VIA CALL FROM 'TI' ROUTINE 

SS: CONVERT CHARACTER IN A-REG FROM LONER CASE TO UPPER CASE 
i L08ER OR UPPER CASE CHAR IN A-REG 
Ti UPPER CASE CHARACTER IN A-REG 
1 EC* i A.F 
USAGE: 



CPI 

RH 



CPI 
RP 



ANI 
RET 



A'+20H 



Z'»20H+I 



NOT 20H 



J CHAR < LC(A) , I.E. IF THE CHAR IN A-REG 
IS NOT LONER CASE. THEN IT HAS VALUE 
< 61H. SO A - 61H MILL BE NIHUS. IF 
IT IS IN LONER CASE. THE RE8ULT NHL 
BE POSITIVE. 

CHAR > LC<Z> , I.E. HE KNDH THE A-REG IS 
UPPER CASE OR SPECIAL CHAR. IF IT IS A 
SPECIAL CHAR, A - 78H HILL BE OR 
GREATER SB RETURN. 

FORCE UPPER CASE 



;« * 

(* I/O CONTROLLER INTERFACE DRIVERS * 

1 * * 

l»-»-*-*-*-»-*-*-»-*-*-«-*-*-«-t-*-*-«-«-*.*-t-t-*-t-*-t-*-*-*-«-*.*-«-« 
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IOC OBJ SEB SOURCE STATEMENT 

2905 ■■ • 1 C t> R 1 ' - ENTERED VIA CALLS FROM 'CI'.'CSTS' ROUTINES 

2906 i PROCESS! GET DEVICE STATUS OR GET DATA FROM PERIPHERAL 

2907 ; INPUT: B CONTAINS THE COMMAND (STATUS REQUEST OR INPUT DATA REQUEST? 

2908 i OUTPUT: A CONTAINS THE REQUESTED INFORMATION 

2909 : MODIFIED: A, FLAGS, B 

2910 J STACK USAGE: 

2911 I0CDR1: 

FF7F CDAtFF 2912 CALL ICiCCOM ; OUTPUT 'GET DEVICE STATUS COMMAND' OR 

2913 ; 'INPUT DATA COMMAND' TO IOC CONTROL 

2914 ; PORT 

2915 IOCXXX: 

FF82 DBC1 2916 IN IOCS I INPUT DBS STATUS 

FF84 £607 2917 AHI IBF OR 08F OR FOi MASK OFF STATUS FLAGS 

FF.36 FE01 2918 CPI DBF J TEST FOR SLAVE DONE; SOMETHING FOR THE RASTER 

FF88 C292FF 2919 JHZ IOCXXX i IF NOT, CONTINUE TO LOOP 

FF8B 5BC0 2920 IN I0C1 1 OTHERWISE, INPUT THE DATA FROM THE DBI 

FF8P FJ 2921 PUSH PS» J SAVE A-REC 

FF8E 3E0S 2922 HVI A.EHABL ; ENABLE INTERRUPTS 

FF*0 &3FF 2923 OUT CPUC 

FF92 Fl 2924 POP PSU ,' RESTORE A-REG 

FF93 C9 2925 RET 

29 26 i - 

2927 1 '10CDR2' - ENTERED VIA CALLS FROM ' BLK * , ' COH' , ' CO' , ' CRTOUT ' ROUTINES 

2928 ; PROCESS'- OUTPUT OH'.k TO THE PERIPHERAL DEVICE 

2929 ; INPUT: B CONTAINS ifc 1 -: EONKAHD TO OUTPUT THE &ATfl 

2930 1 C COMETHS iijii TO SE OUTPUT 

2931 ; OUTPUT: 

2932 ; MODIFIED! A, FLAGS, s*. C 

2933 ; STACK USAGE: 

2934 I0CDR2' 

FF94 CDAtFF 2935 CALL TOCCOM ; OMTPUT 'OUTPUT DATA COHMAHD" TO IOC 

29)6 ; CONTROL PORT 

2937 10CYYY: 
97 06C1 2938 IN IOCS ; INPUT DBB STATUS 

99 E607 2939 AHI IBF OR FO OR DBF; TEST FOR SLAVE PROCESSOR READY 

9B C297FF 2940 JHZ IOCYYY ; COHTIHUE TO LOOP UHT1L IT IS READY 

9E 79 2941 NOV A,C ; LOAD DATA TO BE WRITTEN 

9F D3C0 2942 OUT IOCO ; OUTPUT DATA TO THE DBB 

At 3E0S 2943 HVI A.EHABL I EHABLE IHTERRUPTS 

A3 D3FF 2944 OUT CPUC 

A5 C9 2945 RET 

2946 ; 

2947 ; 'IOCCOH' - COHMOH ROUTINE TO IOC DRIVERS 

2948 ; ENTERED VIA CALLS FROM 'I0CDR1' AND 'I0CDR2' 

2949 I PROCESS: OUTPUT COHMAHD TO THE IOC 

2950 ; INPUT: B CONTAINS THE COHHAHD 

2951 ; OUTPUT: 

2952 ; MODIFIED: A, FLAGS 

2953 > STACK USAGE: 

2954 IOCCOH: 
FF.A6 3E0D 2955 HVI A.DISABL ; BLOCK ALL IHTERRUPTS 
FFA8 D3FF 2956 OUT CPUC 

2957 IOCZZZi 
FFAA DBC1 2958 IH IOCS i IHPUT DBB STATUS 

FFAC E607 2959 AHI FO OR IBF OR DBF; TEST FOR SLAVE PROCESSOR IDLE 
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IOC 3BJ 



SEB 



SOURCE STATEMENT 



FFAE C2AAFF 

FFB1 78 

FF82 D3C1 

F F B 4 C 9 



FFB5 CDE4FF 



FFB8 3E0D 

FFBA D3FF 

FFBC DBFS 

FF8E EbO? 

FFCO FEOI 

FFC2 C2B8FF 

FFC5 DBFS 

FFC7 F5 

FFC8 3E05 

FFCA D3FF 

FFCC Fl 

FFCD C9 



FFCE COE4FF 

FFDl 3E0D 
FFD3 D3FF 
FFOS DBF9 
FFD7 E607 
FFDJ C2D1FF 
FFPC 79 
FFDD 03F8 
FFOF 3E0S 
FFE1 D3FF 
FFE3 C9 



2960 
2962 
2962 
2963 
2964 
2965 
2966 
296? 
2968 
2969 
2970 
2971 
2972 
2973 
2974 
2975 
2976 
2977 
2978 
2979 
2930 
29B1 
2982 
2983 
2984 
29 85 
2986 
2987 
2988 
29B9 
2990 
2991 
2992 
2993 
2994 
2995 
2996 
2997 
2998 
2999 
3000 
3001 
3002 
3003 
3004 
3005 
3006 
3007 
300B 
3009 
3010 
391 1 
3012 
3013 
3014 



JNZ 
ilOV 
OUT 

RET 



IOCZZZ 
ft, 8 
IOCC 



LOOP UNTIL IT IS IDLE 

LOAD COMMAND 

OUTPUT COMMAND TO IOC CONTROL PORT 



ft-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-.*-*-*-*-*.*. 
PARALLEL I/O INTERFACE DRIVERS 



-*-*-*-t -• 
'PI0DR1* - 
'PI0DR2 - 
PROCESS: G 
INPUT: B C 
OUTPUT: A 
MODIFIED: 
STACK USAG 
PI0OR1 : 

CALL 



EHTERE 
ENTERE 
£T DEVI 
ONTAI MS 
CONTAIN 
A, FLAC 
E: 



*-*-»-«-»-«-*-•-*..*-♦-*-«-«..«-»-*-»-»-*-*-*-*-»-«_» 
b VIA CALLS FROM ' R I ' , ' PO' , ' POC ' , ' LO ' , ' UPPS ' 
b VIA CALLS FROM 'UI','UPPS" ROUTINES 
CE STATUS OR SET DATA FROM A PERIPHERAL 

THE COMMAND (STATUS REQUEST OR INPUT DATA REQUEST) 
S THE REOUESTED INFORMATION 



P10C0H 



PI 0DR2: 



NVI 

OUT 

IN 

AN! 

CP1 

JHZ 

IN 

PUSH 

MVI 

OUT 

POP 

RET 



A,DI 

CPUC 

PI OS 

FO 

OBF 

PIOD 

PI01 

PSU 

A, EN 

CPUC 

PSW 



SA8L 



OUTPUT 'GET DEVICE STATUS COMMAND' OR 
'INPUT DATA COMMAND' OR OTHER SUCH 
COMMAND TO THE PIO CONTROL PORT 

BLOC)! ALL INTERRUPTS 



i INPUT DBB STATUS 

R 1BF OR OBF; MASK OFF STATUS FLAGS 

; TEST FOR SLAVE DONE; SOMETHING FOR THE MASTER 

R2 i LOOP UNTIL SLAVE IS READY 

i OTHERVISE INPUT THE DATA FROM THE DBB 

; SAVE A-REC 

A6L ; ENABLE INTERRUPTS 

; RESTORE A-REG 



' PIOD 
'PIOD 
PROCE 
INPUT 

OUTPU 

NODIF 

STACK 

PI0DR3: 

P10DR4: 



R3' - ENTERED VIA CALLS FROM ' POC ' , ' PO * , ' LO' 

R4' - ENTERED VIA CALLS FROM 'UI'.'UO' 

SS: OUTPUT DATA TO A PERIPHERAL DEVICE 

: B CONTAINS THE COMMAND TO OUTPUT THE DATA 

C CONTAINS THE DATA TO BE OUTPUT 



UI 



'UO' ROUTINES 



T : 

I ED: A, 
USAGE: 

CALL 

MVI 

OUT 

IN 

AHI 

JHZ 

NOV 

OUT 

MVI 

OUT 

RET 



FLAGS, B, C 



PIOCOM 



tBL 



A.DISA 

CPUC 

PIOS ; 

FO OR I8F OR OBF; 

PI0DR4 ; 

A, C ; 

PIOO ; 

A.ENABL ; 

CPUC 



; OUTPUT 'OUTPUT DATA COMMAND' TO PIO 
1 BLOCK ALL INTERRUPTS 



INPUT DBB STATUS 

TEST FOR SLAVE PROCESSOR READY 

LOOP UNTIL IT IS READY 

LOAD DATA TO BE MUTER 

OUTPUT DATA TO THE DBB 

ENABLE INTERRUPTS 
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IOC OBJ 



SEB 



SOURCE STATEMENT 



FFE4 


3E0D 


FFE6 


D3FF 


FFE8 


DBF* 


FFEA 


E607 


FFEC 


C2EBFF 


FFEF 


?B 


FFFO 


&3F9 


FFF2 


3E0S 


FFF4 


D3FF 


FFF6 


C9 


FFFD 




FFFD 


60 


FFFE 


00 


FFFF 


01 



PUBLIC SYMBOLS 



EXTERNAL SYMBOLS 



3019 
3016 
3017 
3018 
3019 
3020 
3021 
3022 
3023 
3024 
3025 
3026 
3027 
3028 
3029 
3030 
3031 
3032 
3033 
3034 
3035 
3036 
3037 
3038 
3039 
3040 
3041 
3042 
3043 
3044 
3045 



;-- 
; ' 

i 

i i 
; 
; M 
; S 
PIO 



PIOCOH' - COMMON ROUTINE OF PIO DRIVERS 

ENTERED VIA CALLS FROM 'PI0DR1' 
HPUT: 8 CONTAINS THE COMMAND 
UTPUTt 

ODIFIED: A. FLAGS 
TACK USAGES 
COM: 

MVI A.DISftBL i BLOCK ALL INTERRUPTS 

OUT CPUC 



'PI0DR3'. 'RI' ROUTINES 



PIOZZZi 

IN PIOS ; INPUT DBB STATUS 

AH1 FO OR IBF OR DBF; TEST FOR SLAVE PROCESSOR IDLE 

JNZ P10ZZZ ; LOOP UNTIL IT IS IDLE 

NOV A,B ) LOAD TNE COMMAND 

OUT PIOC J OUTPUT THE COMMAND TO THE PIO CONTROL PORT 

MVI A.EHABL J ENABLE INTERRUPTS 

OUT CPUC 

RET 

ORG DFFFDH 

NHCKSNi DB 06DH ; CHKSUH MONITOR TO 01EH 

DB 00 ; UNUSED BYTE 

DB 01 i ft, IF SERIES I MONITOR 

; 1. IF SERIES II MONITOR 

; END OF PROGRAM 

\ 

;♦-*-«-«-*-*-*-•-•-•-«-»-«-*-♦-*-«-*-»-•-•-•-•-•-•-*-*-«-•-»-*-«-*-»-• 
END 



USER SYMBOLS 






































BUSER 


A 


FCBC 


ACHRH 


A 


007F 


ACT 


A 


F913 


ACTBL 


A 


FB81 


BLOC 


A 


EACF 


ALT 


A 


F92B 


ALUP1 


A 


FBD3 


ALUP2 


A 


F8DB 


ALUP3 


A 


FBF2 


APT 


A 


F923 


ART 


A 


F91B 


ASO 


A 


F8BE 


AS1 


A 


F8CD 


AS2 


A 


F8E5 


AS3 


A 


F8F2 


ASSIGN 


A 


FBB6 


BO 1 10 


A 


02BA 


B2400 


A 


0020 


B960O 


A 


0007 


BASE 


A 


F8D0 


BATCH 


A 


0002 


BBASE 


A 


E800 


BCDC 


A 


0001 


BDLY 


A 


EAD7 


BDLY1 


A 


EA09 


BEGIH 


A 


F800 


6LK 


A 


FC93 


BLOC 


A 


EACB 


BOVROF 


A 


0001 


BOVRON 


A 


0009 


BREAK 


A 


FC07 


BSD 


A 


EB06 


BS1 


A 


E83B 


BS10 


A 


E8FF 


BS11 


A 


E90C 


BS12 


A 


E93A 


BS13 


A 


E945 


BS14 


A 


E967 


BS2 


A 


E84E 


BS3 


A 


E8St 


BS4 


A 


E898 


BS5 


A 


EBAC 


BS6 


A 


EBB2 


6S7 


A 


EBCB 


BS8 


A 


E8CE 


BS9 


A 


E8D6 


BSX1 


A 


E97A 


BSX10 


A 


E9FC 


BSX2 


A 


E990 


BSX3 


A 


E99E 


BSX4 


A 


E9A9 


BSX5 


A 


E9B0 


BSX6 


A 


E9CE 


BSX8 


A 


E9E2 


BSX9 


A 


E9F1 


BTCKSM 


A 


EA48 


BTDGOF 


A 


0004 


BTDGON 


A 


OOOC 


BYTE 


A 


FDDB 


CCRT 


A 


0001 


CI 


A 


F8BE 


CIO 


A 


FBDO 


CU 


A 


FBE1 


cr? 


A 


FBEB 


CI3 


R 


FBEC 


CI4 


A 


FBFD 


CHOC 


A 


EAEB 


CL5 


A 


0000 


CL6 


A 


0004 


CL7 


A 


0008 


CLB 


A 


OOOC 


CLERR 


A 


0010 


CLOC 


A 


EACA 


CHSK 


A 


DOFC 


CHOTD 


A 


0008 


CO 


A 


FC9F 


CDO 


A 


FCB2 


COIOC 


A 


EAEB 


COM 


A 


FC95 


COHC 


A 


FCDE 


COKD 


A 


0025 


COHC 


A 


00C1 


COHI 


A 


ODCO 


CONO 


A 


OOCO 


COKS 


A 


00 CI 


CONV 


A 


FDF4 


COP 


A 


FB09 


CPUC 


A 


OOFF 


CPUS 


A 


OOFE 


CR 


A 


OOOD 


CRLF 


A 


FDFE 


CR1C 


A 


0010 


CRT0T1 


A 


FCCA 


CRT0T2 


A 


FC05 


CRTOUT 


A 


FCBE 


CRTS 


A 


0011 


CSO 


A 


FDS3 


CB1 


A 


FD6B 


C3? 


A 


FD74 


CS3 


A 


FD79 


CSLOC 


A 


EAFD 


CSMEN 


A 


OOOB 


CSTS 


A 


FD44 


CTBL 


A 


F8B2 


CTROP 


A 


OOFO 


CTROS 


A 


0000 


CTR1P 


A 


00F1 


CTR1S 


A 


0040 


CTR2P 


A 


D0F2 


CTR2S 


A 


0080 


CTTY 


A 


0000 


CUSE 


A 


0003 
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OADR 


A 


FED? 


DATE 


A 


0401 


OBYTE 


A 


FEDC 


DECHO 


A 


0007 


BELAY 


A 


FE1E 


010 


A 


F938 


Oil 


A 


F93E 


01? 


A 


F9S6 


DIASBT 


A 


E603 


OIACHH 


A 


EBOO 


DISABL 


A 


000ft 


DISAXP 


A 


0000 


OISP 


A 


F933 


OLOC 


A 


EAC9 


DLY1 


A 


FE20 


DPRMT 


ft 


0008 


DREG 


A 


FE25 


OSR 


A 


0080 


DSTAT 


A 


0003 


OSTS 


A 


0078 


DTR 


A 


0002 


ELiC 


A 


EAC8 


EHABL 


A 


0005 


EHAXP 


A 


0008 


ENOX 


A 


EBOO 


EHHM 


ft 


0080 


EOF 


A 


F95F 


EDI 


A 


0020 


ERfSET 


A 


OD01 


ERHSC 


A 


EA3A 


ERROR 


A 


F847 


ETX 


A 


0003 


EXO 


ft 


FE46 


EXIT 


A 


EAD2 


EXPR 


A 


FE39 


FO 


A 


0804 


FALSE 


A 


0000 


F»OC 


A 


0004 


FIO 


A 


F984 


FILL 


A 


F97D 


FLOC 


A 


EACE 


FRDY 


A 


0001 


FS10P 


A 


OQE? 


FSTP 


A 


0OF7 


GOO 


A 


F9A4 


G01 


A 


F9AA 


G02 


A 


F9BA 


G03 


A 


F9C2 


G04 


A 


F9DI 


C010 


A 


F98C 


HEXH 


A 


F9D5 


HI 


A 


007A 


KILO 


A 


FE4C 


HLOC 


A 


EAOD 


HUSK 


A 


OOFF 


HXO 


A 


FE64 


I5F 


A 


0002 


ICFt 


A 


0041 


ICMP 


A 


0001 


ICRTI 


A 


0020 


ICRTO 


ft 


0010 


i cm 


A 


0012 


ICB2 


A 


0000 


ltCF-0 


A 


OOFS 


IICP1 


A 


OOFA 


HOC 


A 


EACO 


UPT 


A 


0040 


I MI T 


A 


E803 


INITIO 


A 


0006 


INTO 


A 


0001 


IM71 


A 


0002 


IHT2 


A 


0004 


INT3 


A 


0008 


INT4 


A 


0010 


IMT5 


ft 


0020 


1NT6 


A 


0040 


INT7 


A 


0080 


EtfTf) 


A 


OOOO 


IOBYT 


A 


0003 


10CC 


A 


00C1 


IOCCOH 


A 


FFA6 


I0CDP1 


ft 


F821 


I0CDP2 


A 


F844 


I0C0R1 


A 


FF7F 


racoRZ 


A 


FF94 


IOCHK 


A 


FD83 


I0C1 


A 


OOCO 


10CO 


A 


OOCO 


IOCPO 


ft 


OOFB 


I0CP1 


A 


OOFA 


IOCS 


A 


0OC1 


istxxx 


A 


FF82 


iocyyy 


A 


FF97 


I0C2ZZ 


A 


FFAA 


IODEF 


A 


FD94 


IOPB 


ft 


EA18 


IOSET 


A 


FOB? 


IPTP 


A 


0004 


m* 


A 


0008 


ITCP 


A 


0DF3 


IT I HO 


A 


OOFF 


ITTYI 


A 


0002 


ITTYO 


ft 


0001 


KEYC 


A 


0012 


KINT 


A 


0014 


KSDY 


A 


0001 


KSTS 


A 


0013 


L1L0C 


A 


EAFA 


LAOR 


A 


FE5t 


LBHK 


A 


OOFF 


LBYTE 


A 


FE5B 


LCRLF 


A 


FE6A 


LCRT 


A 


0040 


LCT 


A 


001A 


LCTR 


A 


0000 


LERIt 


A 


OOOE 


LF 


A 


000ft 


LLOC 


A 


EftDC 


LLPT 


A 


0080 


LUfK 


A 


003F 


to 


A 


FD1E 


LOH 


A 


FD14 


LOMU 


A 


0079 


LPO 


A 


F033 


LPTC 


A 


0014 


LPTRY 


A 


0001 


LS1C 


A 


0015 


LSTE 


ft 


0040 


LTBL 


A 


F903 


LTTY 


A 


0000 


LOSE 


A 


OOCO 


LVER 


A 


001B 


HEHEHK 


A 


FD8C 


HEKTOP 


a 


0004 


HEHB 


A 


0080 


HLP 


A 


EBEE 


HNCKSH 


A 


FFFD 


RODEO 


A 


0000 


H0DE1 


A 


0002 


H0DE2 


A 


0004 


BODEJ 


} 


0006 


H0DE4 


A 


0008 


N0DE5 


A 


OOOA 


HOVBOT 


A 


0002 


HOVE 


A 


F9F0 


MVO 


A 


F9F7 


HIO 


A 


FEA6 


NIBBLE 


A 


FE98 


NLEADX 


A 


FAOB 


HREGS 


A 


OOOC 


HUO 


A 


FA09 


HULL 


A 


FA01 


OBF 


A 


0001 


0CU3 


A 


OOOB 


0HEH5 


A 


0070 


OPCPL 


A 


0004 


P1L0C 


A 


EAF4 


P2C 


A 


FECB 


P2L0C 


A 


EAF7 


PAO 


A 


FE7A 


PA1 


A 


FE70 


PA2 


A 


FE90 


PACIFY 


A 


DOOO 


PAOR 


A 


FEAA 


PARAN 


A 


FE74 


PARHL 


A 


0004 


PBYTE 


A 


FEAF 


PCHK 


A 


FEC5 


PCONP 


A 


0002 


PENS 


A 


0010 


PEVEH 


A 


0020 


PGROY 


A 


0001 


PIOC 


A 


O0F9 


PIOCOH 


A 


FFE4 


PI0DR1 


A 


FFB5 


Pt3E>R2 


A 


FFB8 


PI00R5 


A 


FFCE 


PI00R4 


A 


FFD1 


PIOI 


A 


OOFS 


PIOO 


ft 


OOFB 


PIOS 


A 


O0F9 


PIOZZZ 


A 


FFE8 


PLOC 


A 


EAE1 


PNSK 


A 


OOCF 


PNIB. 


A 


0010 


PO 


A 


FCE9 


POO 


ft 


FCF7 


P01 


A 


FD08 


POC 


A 


FCE5 


PF7P 


A 


0010 


PRTH 


A 


EAOE 


PSOCK 


A 


0020 


PSTC 


A 


0013 


PTPRY 


ft 


0001 


PTRAOV 


A 


0040 


PTRDY 


A 


0001 


PTRREV 


6 


0060 


PTTY 


A 


0000 


PUHC 


A 


0012 


PUSE1 


A 


0020 


PUSE2 


ft 


0030 


80 


A 


FA21 


01 


A 


FA30 


82 


A 


FA48 


OUERY 


A 


FA14 


R16X 


A 


0002 


RUOC 


A 


EAEE 


R1X 


A 


0001 


R2L0C 


A 


EAFJ 


R64X 


A 


0003 


RA9CT 


A 


0028 


RDBC 


A 


0019 


RDBCC 


A 


001A 


RORC 


A 


0010 


RftSTS 


A 


001C 


READ 


A 


FA52 


REOO 


A 


FA5» 


RE01 


A 


FA7B 


RE02 


A 


FA93 


RE03 


A 


FA9E 


RE04 


A 


FAB3 


RESET 


A 


0000 


RESTAR 


A 


FE04 


RFR 


A 


0020 


RI 


A 


FCOF 


RIO 


A 


FC1F 


RI 1 


A 


FC2C 


RI2 


A 


FC39 


RI3 


A 


FC47 


RI4 


A 


FC4C 


RMS 


A 


FC4F 


RI5 


A 


FC58 


KU 


A 


FC65 


R17 


A 


FC79 


RI8 


A 


FG82 


RIX 


A 


FF58 


RLLB 


A 


0010 


RLLN 


A 


0030 


RLNB 


A 


0020 


RUSK 


A 


0OF3 


ROV 


A 


0010 


RPAR 


A 


0008 


RPPC 


A 


0017 


RPSTC 


A 


0018 


RPTR 


A 


0004 


RRD? 


A 


0002 


RRSTS 


A 


001B 


RSTO 


A 


FEF7 


RST1 


A 


FF25 


RST2 


ft 


FF42 


RST3 


A 


FF50 


RSTft 


A 


FF1? 


RS1B 


A 


FF20 


RSTC 


A 


001 1 


RSTS 


A 


007B 


RTCC 


A 


04C0 


RTOCT 


ft 


OOFA 


RTS 


A 


0020 


RTTY 


A 


0000 


RUSE J 


A 


«008 


RUSE2 


A 


OOOC 


RXEN 


A 


0004 


SBCH 


A 


0008 


SICPO 


ft 


ODF» 


SICP1 


A 


OOFC 


SINT 


A 


OOOA 


SLOC 


6 


EOOl 


SOCPO 


A 


OOFD 


S0CP1 


A 


OOFC 


SRB 


A 


0006 


SRDACK 


ft 


0005 


SRBOAK 


A 


0004 


ST1 


A 


0040 


ST15 


A 


0080 


ST2 


A 


OOCO 


START 


A 


FS55 


STARTO 


A 


F851 


SUP 


A 


FAC3 


SU1 


A 


FAD9 


SUBS 


A 


FABF 


SYKC 


A 


oono 


SYMO 


A 


0040 


SYSTAT 


A 


0002 


TAOV 


A 


0027 


TI 


A 


FF61 


TLOC 


A 


EAE2 


TOS 


A 


EAC8 


tout 


A 


OOFA 


TRAM 


A 


0009 


TROY 


A 


0001 


TRKO 


A 


3000 


TRKL 


ft 


0000 


TRUE 


A 


FFFF 


TTYC 


A 


OOFS 


TTYI 


A 


O0F4 


TTY1H 


A 


FBC6 


TTYO 


A 


00F4 


TTYOOT 


A 


FCA7 


TTYS 


A 


OOFS 


TXBE 


A 


0004 


TXEH 


A 


0001 


UC 


A 


FF76 


UCI 


A 


0000 


UCO 


A 


0001 


UCS 


A 


0007 


01 


A 


FPAD 


UL1 


A 


0006 


UO 


A 


FOBE 


UPI 


A 


0004 


UP2 


A 


00 5 


UPPS 


A 


FOCE 


UR1 


A 


0002 


UR2 


ft 


0003 


usee 


A 


O0F7 


USCI 


A 


OOFS 


usco 


A 


OOFS, 


uses 


A 


00F7 


USER 


A 


EACO 


USRST 


A 


0040 


VER 


ft 


OOOC 


VERB 


A 


0012 


VERS 


A 


EA1F 


UOBC 


A 


OOt ? 


HDBCC 


A 


0016 


MP8C 


A 


0015 


BPBCC 


A 


0016 


MPPC 


ft 


0016 


URO 


A 


FAE5 


UR1 


A 


FAEO 


MR2 


A 


FAF8 


WR3 


A 


FB07 


VRITE 


A 


FAOO 


X 


A 


FB26 


XO 


ft 


F83I 


XI 


A 


FB3F 


X2 


A 


FB42 


X3 


A 


FB5F 


X4 


A 


FB60 


XS 


A 


FB6A 


X6 


A 


FB60 


XTBL 


ft 


EAE8 


z 


A 


FBA6 
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PACE 



■ USER 

ACHRM 

ACT 

RC1BL 

AL'OC 

ALT 

ALUP1 

ALUP2 

ALUP3 

APT 

AKT 

ASO 

ASt 

A3? 

as; 

ASSIGN 

B0110 

B2400 

B9f 00 

BASE 

BA1CH 

BBftSE 

BCOC 

BBLY 

B0LY1 

BEf?IH 

BLK 

BLOC 

BQVROF 

BOVRON 

BREAK 

BSO 

BS1 

BS10 

BS11 

BS12 

BS13 

BS 14 

B32 

B53 

BS4 

BS* 

sse 

857 

B33 

BS? 

BSX1 

BSX10 

BSX2 

BSX3 

BSX4 

BSX5 

BSX6 

BSX8 

BSX9 

BTCKSH 

BTOOOF 



1841 
3841 

1146 
1675 

8471 
11 32 
11041 
110*1 
11251 
1150 
1148 
10841 
1087 

n i s i 

1118 

1045 
2128 
2tlt 
2101 
9278 
3418 
4148 
209* 
546 
7908 
773 

1365 
571 
871 
88* 

1850* 
416 
475* 
610* 
387 
647* 
6341 
670* 
487 
494* 
5411 
545 
5S5* 
559 
549 
568 
590 
738 
692 
706 
708 
698 
735 
745 
741 
828* 
89* 



1946 

1160* 
1739* 
1740 
1175* 
1107 
1112 
1128 
1170* 
1163* 
1092 
1095* 
1121 
1124* 
1079* 
528 
517 

928 

1163 

415 

547 
792 
937* 
1689 
624 
439 

1986 
435* 
483 
613 
622* 
652 
657 
674 
489* 
499 
550 
551* 
564 
565* 
563 
5741 
618 
751 
701* 
709* 
715* 
721* 
746* 
756* 
748 

761 



1958* 2008 



1753 



2100 



2102 



2129 



2203 



1838 
835 

360 



1722 
689 



2118 



1985 



561 



1980* 

841* 



2004 



788* 



1741 



2117 



2198 



681 



569* 

627 

779* 

713 



755 



1002 



631 



718 



768* 



636 



662 



687* 



783 
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BTDGOH 901 1765 

BYTE 1493 1499 1501 1583 1516 1523 1554 1559 1570 1571 23531 

CCRT 340* 1162 1802 2006 2165 

CI 939 17871 2869 

CM 1790 18011 

CI1 1816* 1819 

Ct2 1813 18241 

Cli 1826* 1830 

£14 1803 18371 

CUOC 8761 896 1840 

Ct-5 144* 

CL« 143* 

El7 1421 

CL3 1411 522 533 

CLERR 1571 

ClOC 840* 1742 

CNSK 3341 1145 1789 1984 1990 2116 2154 

CHOTO 3061 

CO 941 19881 2875 

COO 1991 20038 

CQLOC 8781 B97 2007 

CON 1434 1460 1727 19(2* 2058 2551 

GONC 986 1007 1320 1435 1595 1692 1728 2050* 2396 2398 2817 

CONO 178* 1888 

COKC 76t 

COKI 75* 

COtiO 76* 

COKS 77* 

COKV 2379* 2427 2430 2550 2645 2648 

COP 394* 800 

CPUC 96* 4J8 440 442 444 757 759 1003 17*6 1874 1908 2923 2944 2956 2982 2990 

3006 3013 3024 3032 

CPUS 95* 

CR 328* 819 821 826 826 1010 1127 1406 1426 1659 1715 1763 2397 2510 2672 

CRIF 1006 1347 1359 1432 1486 1618 1720 23958 

CRTC 233* 2037 

CRT0T1 2023* 2026 

CRTQT2 2020 20328 

6RI8UT 20121 2126 

CRTS 234* 552 

CSO 2155 2164* 

CS1 2174 2183* 

C32 2161 2180 2190* 

CS3 2166 2197* 

eSLQC 890* 903 2201 

eSttER 296* 

CS1S 944 1851 21528 

CTRL 1022 1044* 1071 

CTR8P 2168 530 932 

CTROS 196* 526 

CTR1P 2178 519 321 

CTR1S 1978 SIS 

CTR2P 2186 439 461 

CTR2S 1968 455 

CTTY 339* 1161 

COSE 343* 1164 

HAD* 1197 2408* 
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DATE 

DBYTE 

DECHO 

DELAY 

610 

Oil 

0t2 

DI.AGBT 

DiAOHH 

OrSABL 

DTSAXP 

DtSP 

0I.OC 

DLYt 

DPRNT 

DREG 

OSR 

DS1AT 

DS1S 

OTR 

ELOC 

EHABL 

EHAXP 

EMOX 

EHHH 

GOP 

EOi 

ERESET 

ERHSG 

ERROR 

EU 

EXO 

EXIT 

E*PR 

FO 

FALSE 

Ft»0C 

F-ro 

FILL 

FLOC 

FRDY 

FS10P 

FSTP 

C03 

G01 

G82 

G03 

G04 

GOTO 

HeXH 

HI 

HUH 

HLOC 

HUSK 

HXO 



SSI 

1202 
2951 

1BBS 
11951 
11981 
1204 
729 
9 0S! 
821 
841 
104B 

8391 
2441* 
3911 
1691 
1711 
2861 
31SI 
1S4I 
83B« 
838 
SSI 
8921 
1601 
1049 
1031 
2861 
780 
9821 
1122 

3301 
2484 
8511 
1192 
3051 
3201 
3831 
12561 
1050 
8461 
2501 
3811 
3821 
1308 
13191 
1325 
13331 
1317 
1051 
1052 

3131 
1203 
8631 
3221 
1945 
2537 



423 

2410 

1895 
1208 
1207 
12091 
9 081 
1767 
1873 

11911 
1743 
2443 
630 
1730 



584 

177 

1744 

441 

44 3 



12261 
2793 

8261 

1013 

1329 

2872 

24871 

1300 

122 8 

543 

321 

1259 

12501 
1745 

485 

488 
13161 
1327 
13281 
1345 
13461 
12981 
13571 

609 
1258 
1746 

500 
1947 
25491 



950 
24211 

1929 



2955 



24541 



58B 

524 

1907 



827 
1024 
1407 



2733 

1252 

557 

2191 



1393 

1749 
B48 



24391 



2911 



3005 



3023 



611 



2922 



739 



2943 



2989 



3012 



3031 



1046 
1427 



1358 
672 



1047 
1528 



1385 
2917 



1053 
1572 



1485 
2939 



1054 
1687 



1617 
2959 



1055 
1761 



24781 
2984 



1056 
1764 



2488 
3008 



1059 
2261 



3027 



1060 
2485 



1064 
2489 



1065 
2574 



1066 
2593 



1069 
2855 



1093 
2873 



1631 



1740 



1662 



1741 



24981 



1742 



1743 



1744 



1745 



1746 



1747 



1748 



1749 



1750 



1751 



1840 
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rsf 


3041 


543 


557 


(72 


tCFC 


3871 


(97 


710 




tCKP 


3881 


572 






t CRT I 


3741 








URTO 


3731 








tCtll 


1001 


445 






ICU2 


1011 


448 






IKPO 


3621 


447 






UCP1 


3(31 


450 






ILOC 


8451 


1747 


1806 


2015 


KPT 


3751 








CHIT 


4171 








INITIO 


4081 


724 






mo 


1071 


451 


845 


2730 


IHTt 


1081 








EH12 


1091 








IHT3 


1101 








1N14 


111! 








CUTS 


1121 








EHU 


1131 








EHT7 


1141 








IHTA 


1151 


453 






toerT 


4048 


722 


1129 


1134 


tocc 


2288 


553 


29(2 




tOCCON 


»5( 


2912 


2935 


29549 


IOCDPI 


3958 


(29 


(33 


(55 


I0C0P2 


39(1 


(44 


650 




I0CDR1 


949 


1828 


1832 


21(( 


IOCDR2 


937 


2038 


29348 




IOCHK 


945 


22128 






toci 


22(9 


5(( 


(75 


2920 


toco 


2278 


2942 






IOCRO 


3(49 








tOCPt 


3(58 


454 






IOCS 


22(8 


542 


5S( 


(71 


rocxxx 


29159 


2919 






rocm 


29379 


2940 






roczzz 


29579 


29(0 






tOOEF 


948 


22549 






IOPB 


59( 


(41 


8099 




I08ET 


94( 


22238 






tPIP 


3718 








rPTR 


3728 








I TCP 


2198 


45( 


91( 


327 


IT1NO 


38S8 


540 


554 




ITTVl 


3788 








ITTVO 


3(98 








KEYC 


2358 


1831 






K1KT 


2378 








K*or 


2498 


1829 


2187 




KST8 


23(8 


(93 


1827 


2185 


LILOC 


8888 


902 


2128 




LADR 


13(4 


1373 


29178 


2820 


LINK 


38(8 


571 


(24 


(89 


UIVTE 


1594 


24(5 


2470 


2519 


LCRLF 


lift 


1210 


23588 




LC«T 


39(8 


1177 


2129 





2917 



2939 



2959 



2984 



3008 



3027 



21(9 



2721 



1447 



(59 



29118 



1788 



((( 



1(67 



(94 



19(3 



753 



1989 



2078 



2115 



2122 



2153 



2213 



2225 



29K 



2938 



2958 



29318 
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2399 2362 



UCT 


1021 


18716 










LC1R 


1999 












LBRA 


781 


8278 










LF 


3291 


819 


821 


826 


826 


1661 


LL-OC 


8(21 


1748 


2804 








LLPT 


3576 


1178 










LNSK 


3378 


1151 


2123 








UO 


943 


2005 


21218 








tOH 


1200 


1212 


21146 


2428 


2431 


2561 


LOOM 


3129 


607 










LPO 


21338 


2137 










LP1C 


2709 


2138 










LP1RY 


2788 


2136 










tsu 


2718 


2134 










tSTE 


3899 












LIBL 


1081 


11446 


1430 








LTTY 


35S9 


1176 










LUSE 


3S89 


1179 


2127 








tVER 


770 


8229 










henchk 


947 


22356 










HEUTOP 


4068 


490 


370 


623 


688 


983 




24S7 


2720 


2732 


2769 


2803 


2823 


HeKB 


3768 












HUP 


S98I 


604 










NHCKSH 


30369 












IIODEO 


2038 












HODE1 


2048 












H00E2 


2058 












H00E3 


2068 


455 


315 


526 






H0DE4 


2076 












H00E5 


2086 












HOVBOT 


919 


437 










HOVE 


10S7 


13839 










HVO 


13899 


1394 










MO 


2611 


26156 










HtBBLE 


2396 


2363 


2579 


26058 






HLEAOX 


14106 


1414 










HREGS 


1678 


17538 










HOO 


1241 


14086 










HULL 


1038 


14046 










06F 


3036 


543 


357 


538 


672 


673 


OC«3 


1029 












OHENS 


3268 


789 


2440 








OPCPL 


3116 


612 


656 








P1L0C 


8849 


900 


2099 








P2C 


2592 


26676 










P2LOC 


8866 


901 


2101 








PAO 


1309 


1601 


1699 


25759 






PA1 


23779 


2589 










PA2 


2581 


25909 










PACIFY 


2856 












PADR 


1233 


1(40 


26266 








PARAH 


1322 


1590 


2479 


23726 






PARHL 


3936 


645 










PBYTE 


1233 


1237 


1240 


1639 


1642 


1646 


RCHK 


1307 


1597 


1676 


1694 


2573 


26656 


PCONP 


1268 













2563 



1299 1311 1330 1563 1805 1960 2014 2168 2236 2257 



2917 2918 2939 2959 2984 2985 3008 3027 



1652 2628 26396 
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PEKB 

PEVEH 

PSRDV 

PMC 

PtOCOH 

PtODRl 

PIQ&R2 

PIODR3 

PI90R4 

PIOI 

PtOO 

pros 

P10Z2Z 

PL DC 
PNSK 
PMIB 
BO 

poa 

POl 

POC 

PPTP 

PRtM 

PS9CK 

PSIC 

PTPRY 

PTRADV 

PTRPY 

PTRREV 

PTTY 

POM 

PU8E1 

PUSE2 

BO 

81 

82 

BOERV 

ItiX 

RllOC 

RU 

R210C 

R64X 

RADCT 

RBBC 

RBBCC 

RBBC 

ROSTS 

READ 

REDO 

RED1 

RED2 

RSD3 

RED4 

RESET 

BESTAR 

RPR 

RI 

RtO 



MSI 
14(1 
1271 
2601 
1922 
1926 
2298 
2092 
2296 
2571 
258t 
2591 
30291 
86BI 
3361 
1291 
942 
20861 
2082 
1229 
3911 
771 
1261 
2691 
2801 
2661 
2791 
2651 
3901 
2681 
3921 
3931 
14311 
14911 
1499 
1061 
1381 
8801 
1391 
8821 
1371 
1751 
2421 
2431 
2641 
2491 
1862 
14871 
19191 
19421 
1496 
1962 
4021 
S04 
1691 
940 
18771 



3030 
2977 
1939 
2337 
2139 
2319 
2967 
3011 
2983 
3028 
1312 
1149 

20778 
2090 
20971 
1411 
1172 
782 

2087 
2089 
1921 
1927 

1171 
2091 
1173 
1174 
1464 
149B 
14991 
14241 
922 
898 

899 

1683 
669 

1921 
628 

14831 
1490 
1922 
1949 
19928 
15688 
905 
906 

1839 
18B0 



3003 

2088 

29801 

2291 

2322 



3007 

1564 
2079 

2646 



1622 
2081 
7981 



2098 



933 
19*9 

1947 



1934 
632 

1990 



30221 

2135 

2986 

2316 

30041 



3026 



1750 



2649 



1658 



803 



2335 

30021 
3009 



2809 



1660 



29761 



20701 



653 



792 



907 
2709* 

18691 2894 
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Rtt 


18841 


1887 




R!2 


18911 


189 7 




R13 


18981 


1932 




Rt4 


1894 


19028 




RUB 


1901 


19058 




RE5 


1869 


19159 




RU 


19241 


1931 




r r 7 


19 28 


19339 




Rt8 


1917 


19429 




ft IX 


1488 


2355 


2362 


RLIB 


2011 






RLLM 


2021 


455 


515 


RlMB 


2001 






RUSK 


3351 


1147 


1868 


ROY 


1681 






RP*R 


1671 






RPPC 


2731 


2289 




RPSTC 


2741 


2334 




RP1R 


3461 


1167 


1916 


RRDY 


USI 


705 


712 


RRSTS 


2441 


658 




RSTO 


27471 


2758 




RS71 


27 80 


2791 


28011 


RS12 


28261 


2844 




RST3 


2836 


28418 




RSI ft 


2777 


27818 




RSTB 


2788 


27928 




RSTC 


2671 


1925 




RSTS 


3148 


736 




RTCC 


3901 


457 




RTOCT 


1761 


1890 




RTS 


1581 


177 


178 


RTTY 


3451 


1166 




RUSEi 


3471 


1168 


1944 


RU5E2 


3481 


1169 




RXEN 


1551 


177 


178 


S8CH 


1561 






StCPO 


1191 


446 




StCP 1 


1201 


449 




StKT 


2981 






SLOC 


500 


84 98 


1751 


SOCPO 


1211 


2794 




SOCPt 


1229 


452 


856 


SR9 


2911 






SR9ACK 


2901 






SR9&AK 


2 891 






STt 


1491 






ST15 


1481 






ST2 


1471 


522 


533 


STfcRT 


10041 


1011 


1015 


STftRTO 


938 


10018 




SUO 


15921 


1607 




SU1 


1599 


16038 




SUBS 


1063 


15898 




SYNC 


1408 






SYKD 


1708 






SYSTAT 


2878 







28538 



526 



1795 



1818 



1893 



2159 



2178 



524 



524 



535 



535 



2724 



2731 



2845 



m$-II ASSEMBLER SVHBOL CROSS REFERENCE. V2.0 



PACE 8 



TADV 

TI 

TL'OC 

T3S 

TOUT 

THAN 

TROY 

TRKO 

TRKL 

TRUE 

TTVC 

TTYI 

TTYIH 

TTYO 

TTY8UT 

TTY9 

TXBE 

TXEH 

UC 

UCI 

UCO 

UCS 

UI 

UL1 

UO 

UPl 

UP2 

UPPS 

UR1 

UR2 

usee 

USCI 

usco 
uses 

USER 

USRST 

VER 

VERH 

VERS 

86BC 

BftBCC 

MPBC 

UPBCC 

KPPC 

URO 

BR1 

MR2 

(183 

HRITE 

X 

MO 

XI 

X2 

X3 

X4 

X5 

Hi 



1771 
1009 
8698 

4»1 
3278 

2971 

1641 
11(1 
3921 
3211 
IBS! 
1821 

17931 
1831 

19941 
1841 
ltil 
1S3I 

2871 
8968 
8971 
9031 
9S1 
9021 
992 
9001 
9011 
933 
09BI 
8991 
192B 
1891 
1911 
1901 
8371 
1S9I 
S4B 
SSI 
769 
2401 
2411 
2381 
2391 
2721 

18211 

1627* 

1630 

16441 

1067 

1066 

1679* 

1681 

16901 

1704 

1696 

1677 

17211 



1881 
1080 
1331 

8361 
1923 

1996 
660 
664 

2199 

S34 

707 

1796 

1999 

1997 

704 

1879 

177 

28961 



2260 
22831 

23101 



23321 



523 
714 
2028 
711 
848 

820 
954 
8191 



642 
646 
2314 
1663 
1632 
16341 
1649 
16161 
16748 
1686 
16888 
1717 
17086 
17101 
17196 
1731 



1105 

2770 

837 



2023 
663 



336 
1797 



2080 
1794 

178 



1110 

2824 

984 



749 



1882 
1875 



2124 

1878 

524 



1126 



738 



1889 
1903 



1892 



S33 



1405 



760 



1425 



762 



1759 



813 



1762 



1854 2588 2666 28678 



1995 



2158 



325 

1820 

1817 
2241 

820 

822 



2024 2177 
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KTBL 
Z 



8731 894 
1070 17581 



901 



PACE 9 
902 903 2258 
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